Module1.vb
Imports Bytescout.BarCode
Module Module1
Sub Main()
' Create new barcode
Dim barcode As New Barcode()
' Set symbology
barcode.Symbology = SymbologyType.DataMatrix
' Set value
barcode.Value = "this is a test string"
' Save barcode to image
barcode.SaveImage("result.png")
' Show image in default image viewer
Process.Start("result.png")
End Sub
End Module
Click here to get your Free Trial version of the SDK
also available as: