ByteScout Premium Suite – VB.NET – Decode bookland barcode with barcode reader sdk

Home
/
Articles
/
ByteScout Premium Suite – VB.NET – Decode bookland barcode with barcode reader sdk

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

How to decode bookland barcode with barcode reader sdk in VB.NET with ByteScout Premium Suite

Learning is essential in computer world and the tutorial below will demonstrate how to decode bookland barcode with barcode reader sdk in VB.NET

The sample shows instructions and algorithm of how to decode bookland barcode with barcode reader sdk and how to make it run in your VB.NET application. ByteScout Premium Suite can decode bookland barcode with barcode reader sdk. It can be applied from VB.NET. ByteScout Premium Suite is the set that includes 12 SDK products from ByteScout including tools and components for PDF, barcodes, spreadsheets, screen video recording.

Want to quickly learn? This fast application programming interfaces of ByteScout Premium Suite for VB.NET plus the guidelines and the code below will help you quickly learn how to decode bookland 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 codes in VB.NET.

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 = "Bookland.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 ' Bookland is the same as EAN-13 barcode

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