ByteScout Barcode Reader SDK – VB.NET – Decode EAN-13

Home
/
Articles
/
ByteScout Barcode Reader SDK – VB.NET – Decode EAN-13

ByteScout Barcode Reader SDK – VB.NET – Decode EAN-13

Module1.vb

Imports System.IO
 
Imports Bytescout.BarCodeReader
 
Module Module1
 
    Sub Main()
 
        Const imageFile As String = "EAN13.png"
 
        Console.WriteLine("Reading barcode(s) from image {0}", Path.GetFullPath(imageFile))
 
        Dim reader As New Reader()
        reader.RegistrationName = "demo"
        reader.RegistrationKey = "demo"
 
        ' Set barcode type to find
        reader.BarcodeTypesToFind.EAN13 = True
 
        ' Read barcodes
        Dim barcodes As FoundBarcode() = reader.ReadFrom(imageFile)
 
        For Each barcode As FoundBarcode In barcodes
            Console.WriteLine("Found barcode with type '{0}' and value '{1}'", barcode.Type, barcode.Value)
        Next
 
        Console.WriteLine("Press any key to exit..")
        Console.ReadKey()
 
    End Sub
 
End Module

ByteScout Barcode Reader SDK – VB.NET – Decode EAN-13

ByteScout Barcode Reader SDK – VB.NET – Decode EAN-13

Tutorials: