ByteScout Barcode Reader SDK – VB.NET – Decode GS1-128

Home
/
Articles
/
ByteScout Barcode Reader SDK – VB.NET – Decode GS1-128

printable version:
ByteScout-BarCode-Reader-SDK-VB-NET-Decode-GS1-128.pdf

How to decode gs1 128 in VB.NET with ByteScout BarCode Reader SDK

The tutorial below will demonstrate how to decode gs1 128 in VB.NET

The sample source code below will teach you how to decode gs1 128 in VB.NET. ByteScout BarCode Reader SDK can decode gs1 128. It can be used from VB.NET. ByteScout BarCode Reader SDK is the SDK for barcode decoding. Can read all popular types from Code 128, GS1, UPC and Code 39 to QR Code, Datamatrix, PDF417. Images, pdf, TIF images and live web camera are supported as input. Designed to handle documents with noise and defects. Includes optional splitter and merger for pdf and tiff based on barcodes. Batch mode is optimized for high performance with multiple threads. Decoded values can be exported to XML, JSON, CSV or into custom data format.

The SDK samples like this one below explain how to quickly make your application do decode gs1 128 in VB.NET with the help of ByteScout BarCode Reader SDK. In your VB.NET project or application you may simply copy & paste the code and then run your app! You can use these VB.NET sample examples in one or many applications.

ByteScout BarCode Reader SDK free trial version is available on our website. VB.NET and other programming languages are supported.

On-demand (REST Web API) version:
Web API (on-demand version)

On-premise offline SDK for Windows:
60 Day Free Trial (on-premise)

Module1.vb

      Imports System.IO
Imports Bytescout.BarCodeReader

Module Module1

    Sub Main()

        Const imageFile As String = "GS1_128.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.GS1 = True ' "GS1-128" barcode type is subset of "Code 128"

        ' -----------------------------------------------------------------------
        ' NOTE: We can read barcodes from specific page to increase performance .
        ' For sample please refer to "Decoding barcodes from PDF by pages" program.
        ' ----------------------------------------------------------------------- 

        ' 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

        ' Cleanup
        reader.Dispose()

        Console.WriteLine("Press any key to exit..")
        Console.ReadKey()

    End Sub

End Module