 
         
         
             Important Update
                        Important Update
                    
                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 rotation angle
        Barcode.Angle = RotationAngle.Degrees90
        ' 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: 
