InitSession Example for Visual Basic

   Dim nRet As Integer
   Dim RasterTwain As New LEADRasterTwain
  
   RasterTwain.EnableMethodErrors = False
   RasterTwain.ManName = "LEAD Technologies, Inc." 
   RasterTwain.ProdFamily= "LEAD Twain COM Object"
   RasterTwain.Version = "Version 16"
   RasterTwain.AppName = "LEADTools Twain test sample"
   nRet = RasterTwain.InitSession(hWnd) 
   If (nRet <> 0) Then
      MsgBox "Error Initializing Twain", vbExclamation
   End If