ByteScout Barcode Reader SDK – VB.NET – Decode Patch Code

Home
/
Articles
/
ByteScout Barcode Reader SDK – VB.NET – Decode Patch Code

printable version:
ByteScout-BarCode-Reader-SDK-VB-NET-Decode-Patch-Code.pdf

How to decode patch code in VB.NET with ByteScout BarCode Reader SDK

The tutorial below will demonstrate how to decode patch code in VB.NET

The sample source code below will teach you how to decode patch code in VB.NET. ByteScout BarCode Reader SDK: the barcode decoder with support for code 39, code 128, QR Code, Datamatrix, GS1, PDF417 and all other popular barcodes. Can read barcodes from images, pdf, tiff documents and live web camera. Supports noisy and damaged documents, can split and merge pdf and tiff documents based on barcodes. Can export barcode decoder results to XML, JSON, CSV and into custom data structures. It can decode patch code in VB.NET.

Fast application programming interfaces of ByteScout BarCode Reader SDK for VB.NET plus the instruction and the code below will help you quickly learn how to decode patch code. In your VB.NET project or application you may simply copy & paste the code and then run your app! Implementing VB.NET application typically includes multiple stages of the software development so even if the functionality works please test it with your data and the production environment.

Free trial version of ByteScout BarCode Reader SDK is available on our website. Documentation and source code samples are included.

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 = "PatchCode.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.PatchCode = True
        ' Add vertical orientations to analysis
        reader.Orientation = OrientationType.Default Or OrientationType.VerticalFromBottomToTop Or OrientationType.VerticalFromTopToBottom

        ' -----------------------------------------------------------------------
        ' 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