ByteScout Barcode Suite – VB.NET – Additional caption with barcode sdk

Home
/
Articles
/
ByteScout Barcode Suite – VB.NET – Additional caption with barcode sdk

printable version:
ByteScout-Barcode-Suite-VB-NET-Additional-caption-with-barcode-sdk.pdf

additional caption with barcode sdk in VB.NET and ByteScout Barcode Suite

Simple tutorial on how to do additional caption with barcode sdk in VB.NET

This page explains the steps and algorithm of implementing additional caption with barcode sdk and how to make it work in your application. ByteScout Barcode Suite was made to help with additional caption with barcode sdk in 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).

If you want to quickly learn then these fast application programming interfaces of ByteScout Barcode Suite for VB.NET plus the guideline and the VB.NET code below will help you quickly learn additional caption with barcode sdk. Follow the steps-by-step instructions from the scratch to work and copy and paste code for VB.NET into your editor. These VB.NET sample examples can be used in one or many applications.

Trial version along with the source code samples for VB.NET can be downloaded from our website

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.Drawing

Imports Bytescout.BarCode

Module Module1

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

        ' Set symbology
        barcode.Symbology = SymbologyType.Codabar
        ' Set value
        barcode.Value = "123456"

        ' Set custom additional caption
        barcode.AdditionalCaption = "Custom caption"
        ' Set additional caption font
        barcode.AdditionalCaptionFont = New Font("Comic Sans MS", 12)
        ' Set additional caption position
        barcode.AdditionalCaptionPosition = CaptionPosition.Above

        ' Save barcode to image
        barcode.SaveImage("result.png")

        ' Show image in default image viewer
        Process.Start("result.png")
    End Sub

End Module