FamilyName Example for Visual Basic

Dim RasterTwain As LEADRasterTwain
Dim strBuffer As String
Dim lCount As Long
Dim n As Integer

lCount = RasterTwain.SourceCount
For n = 0 To lCount - 1 Step 1
   strBuffer = "Source Name = " + RasterTwain.SourceName(n) + Chr(13) + _
               "Product Family Name = " + RasterTwain.FamilyName(n) + Chr(13) + _
               "Manufacturer Name = " + RasterTwain.ManufacturerName(n) + Chr(13)

   MsgBox strBuffer
Next n