Free Trial
Web API version
Licensing
Request A Quote
HAVE QUESTIONS OR NEED HELP? SUBMIT THE SUPPORT REQUEST FORM or write email to SUPPORT@BYTESCOUT.COM
Set Custom Caption | VB.NET
Module1.vb:
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 caption barcode.Caption = "Custom caption" ' Set caption font barcode.CaptionFont = New Font("Comic Sans MS", 12) ' Set caption position barcode.CaptionPosition = CaptionPosition.Above ' Save barcode to image barcode.SaveImage("result.png") ' Show image in default image viewer Process.Start("result.png") End Sub End Module