Code is like this:
dim s as SQLite3MBS = con.NativeAPI
dim b as SQLite3BackupMBS = s.BackupInit(conBackup, "main", con, "main")
if b<>nil then
while s.BackupStep(b, 100) = s.kErrorOk
// show progress
if s.Backupfinish(B) = s.kErrorOk then
MsgBox "backup okay"
MsgBox "Failed to start backup."
As you see, you get the native API of the SQL connection with the SQLite3MBS class. There you call backup methods there. You keep and pass the SQLite3BackupMBS object to the functions.