Link Search Menu Expand Document

Getting Started in Visual Basic 6 (as ActiveX)

The following sample demonstrates how to read barcode from photo image using Bytescout BarCode Reader SDK in Visual Basic 6

VB
Private Sub Form_Load()

Set bc = CreateObject("Bytescout.BarCodeReader.Reader")
bc.BarcodeTypesToFind.Code39 = True

bc.ReadFromFile "BarcodePhoto.jpg"

For i = 0 To bc.FoundCount - 1
     Msgbox "Found barcode on page #" & CStr(bc.GetFoundBarcodePage(i)) & " with type " & Cstr(bc.GetFoundBarcodeType(i)) & " and value " & bc.GetFoundBarcodeValue(i)
Next

Set bc = Nothing

End Sub

Copyright © 2016 - 2021 ByteScout