AcquireSourceName Example for Visual Basic

Public WithEvents RasterTwain As LEADRasterTwain
Public nRet As Integer

Private Sub Command1_Click()
   RasterTwain.AcquireSourceName = "TWAIN Source Name"
   nRet = RasterTwain.Acquire(L_LTWAIN_SHOW_USER_INTERFACE)
   If (nRet <> 0) Then
      MsgBox "Error acquiring from source", vbExclamation
   End If
End Sub