Acquired Bitmap example for Visual Basic

Dim myTwain As New LEADRasterTwain_U

myTwain.InitSession hWnd
myTwain.SelectSource
myTwain.EnableMethodErrors = False
myTwain.SaveAcquiredBitmap = True
myTwain.Acquire (L_LTWAIN_SHOW_USER_INTERFACE + L_LTWAIN_MODAL_USER_INTERFACE)

LEAD1.BitmapList = myTwain.AcquiredBitmapList
MsgBox "Acquired bitmap list count = " + Str(LEAD1.BitmapListCount)

' save last acquired bitmap to file
LEAD1.Bitmap = myTwain.AcquiredBitmap
LEAD1.Save "c:\test.bmp", FILE_TIF, 1, 0, 0