Program.vb
Imports Bytescout.BarCodeReader Class Program Friend Shared Sub Main(args As String()) Dim barcodeReader As New Reader() barcodeReader.RegistrationName = "demo" barcodeReader.RegistrationKey = "demo" ' Limit search to 1-dimensional barcodes only (exclude 2D barcodes to speed up the processing). ' Change to barcodeReader.BarcodeTypesToFind.SetAll() to scan for all supported 1D and 2D barcode types ' or select specific type, e.g. barcodeReader.BarcodeTypesToFind.PDF417 = True barcodeReader.BarcodeTypesToFind.All1D = True Console.WriteLine("Reading barcode(s) from TIFF image...") Dim barcodes As FoundBarcode() = barcodeReader.ReadFrom("multipage.tif") For Each barcode As FoundBarcode In barcodes Console.WriteLine("Found barcode with type '{0}' and value '{1}' at page {2} at {3}", barcode.Type, barcode.Value, barcode.Page, barcode.Rect) Next Console.WriteLine() Console.WriteLine("Press any key to continue.") Console.ReadKey() End Sub End Class
Click here to get your Free Trial version of the SDK
also available as: