ByteScout Barcode Suite – VB.NET – Generate macro pdf417 (multiple) barcode with barcode sdk

Home
/
Articles
/
ByteScout Barcode Suite – VB.NET – Generate macro pdf417 (multiple) barcode with barcode sdk

printable version:
ByteScout-Barcode-Suite-VB-NET-Generate-macro-pdf417-(multiple)-barcode-with-barcode-sdk.pdf

How to generate macro pdf417 (multiple) barcode with barcode sdk in VB.NET and ByteScout Barcode Suite

Learn to code in VB.NET to generate macro pdf417 (multiple) barcode with barcode sdk with this step-by-step tutorial

These source code samples are assembled by their programming language and functions they apply. ByteScout Barcode Suite can generate macro pdf417 (multiple) barcode with barcode sdk. It can be applied from VB.NET. ByteScout Barcode Suite is the bundle that privides 3 SDK products to generate barcodes (Barcode SDK), read barcodes (Barcode Reaer SDK) and read and write spreadsheets (Spreadsheet SDK).

The SDK samples given below describe how to quickly make your application do generate macro pdf417 (multiple) barcode with barcode sdk in VB.NET with the help of ByteScout Barcode Suite. Simply copy and paste in your VB.NET project or application you and then run your app! Applying VB.NET application mostly includes various stages of the software development so even if the functionality works please test it with your data and the production environment.

ByteScout provides the free trial version of ByteScout Barcode Suite along with the documentation and source code samples.

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 Bytescout.BarCode

Module Module1

    Sub Main()
        ' Create new barcode
        Dim barcode As New Barcode()

        ' Set symbology
        barcode.Symbology = SymbologyType.MacroPDF417

        ' we will encode value 123456789
        ' will break into 3 segments, each segment includes 3 symbols

        ' 1st segment
        ' create the first segment barcode so set SegmentIndex = 1
        barcode.Options.PDF417SegmentIndex = 1
        ' Set value            
        barcode.Value = "123"
        ' set that this is not the last segment yet
        barcode.Options.PDF417LastSegment = False

        ' Save barcode to image
        barcode.SaveImage("MacroPDFBarcode-part1.png")

        ' 2nd segment
        ' create the 2nd segment barcode so set SegmentIndex = 2
        barcode.Options.PDF417SegmentIndex = 2
        ' Set value            
        barcode.Value = "456"
        ' set that this is not the last segment yet
        barcode.Options.PDF417LastSegment = False

        ' Save barcode to image
        barcode.SaveImage("MacroPDFBarcode-part2.png")


        ' 3rd segment
        ' create the 3rd segment barcode so set SegmentIndex = 3
        barcode.Options.PDF417SegmentIndex = 3
        ' Set value            
        barcode.Value = "789"
        ' set that this is the LAST segment, so set PDF417LastSegment = TRUE
        barcode.Options.PDF417LastSegment = True

        ' Save barcode to image
        barcode.SaveImage("MacroPDFBarcode-part3.png")

        ' now open all three images

        ' Show image in default image viewer
        Process.Start("MacroPDFBarcode-part1.png")
        Process.Start("MacroPDFBarcode-part2.png")
        Process.Start("MacroPDFBarcode-part3.png")
    End Sub

End Module