ByteScout Premium Suite – VB.NET – Decode gs1-128 barcode with barcode reader sdk

Home
/
Articles
/
ByteScout Premium Suite – VB.NET – Decode gs1-128 barcode with barcode reader sdk

printable version:
ByteScout-Premium-Suite-VB-NET-Decode-gs1-128-barcode-with-barcode-reader-sdk.pdf

How to decode gs1 128 barcode with barcode reader sdk in VB.NET using ByteScout Premium Suite

This code in VB.NET shows how to decode gs1 128 barcode with barcode reader sdk with this how to tutorial

The code displayed below will guide you to install an VB.NET app to decode gs1 128 barcode with barcode reader sdk. ByteScout Premium Suite is the bundle that includes twelve SDK products from ByteScout including tools and components for PDF, barcodes, spreadsheets, screen video recording and you can use it to decode gs1 128 barcode with barcode reader sdk with VB.NET.

This prolific sample source code in VB.NET for ByteScout Premium Suite contains various functions and other necessary options you should do calling the API to decode gs1 128 barcode with barcode reader sdk. Follow the instructions from scratch to work and copy the VB.NET code. Enjoy writing a code with ready-to-use sample VB.NET codes.

The trial version of ByteScout Premium Suite can be downloaded for free from our website. It also includes source code samples for VB.NET and other programming languages.

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