The following sample demonstrates how to create barcode 39 visual basic for BarCode SDK

Imports Bytescout.BarCode

Module Module1

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

       ' Set symbology to barcode 39 type
       barcode.Symbology = SymbologyType.Code39
       ' Set value
       barcode.Value = "Sample"

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

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

End Module