How to Generate Code39 in C# and VB.NET

using System;
using System.Drawing;
using System.Drawing.Imaging;
usingPQScan.BarcodeCreator;

namespaceCode39GeneratorInCSharp
{
    classProgram
    {
        staticvoid Main(string[] args)
        {
            //Create an instance of PQScan.BarcodeCreator.Barcodeobject.
            Barcode code39 = new Barcode();
            //Set barcode date to encode
            code39.Data = "123456789";
            //Set barcode type
            code39.BarType = BarCodeType.Code39;
            //Set barcode image width
            code39.Width = 300;
            //Set barcode image height
            code39.Height = 100;
            //Set 1d barcode human-readable text to display
            code39.ShowText = true;
            //Set barcode image foregroud color
            code39.BarcodeColor = Color.Black;
            //Set barcode image back ground color
            code39.BackgroundColor = Color.White;
            //Set barcode image format
            code39.PictureFormat = ImageFormat.Bmp;
            //Save barcode image to file
            code39.CreateBarcode("code39-csharp.bmp");

        }
    }
}

Imports System.Drawing
Imports System.Drawing.Imaging
Imports PQScan.BarcodeCreator

Namespace Code39GeneratorInVB
    Class Program
        Private Shared Sub Main(args As String())

            'Create an instance of PQScan.BarcodeCreator.Barcode object.
            Dim code39 As New Barcode()
            'Set barcode date to encode
            code39.Data = "123456789"
            'Set barcode type
            code39.BarType = BarCodeType.Code39
            'Set barcode image width
            code39.Width = 300
            'Set barcode image height
            code39.Height = 100
            'Set 1d barcode human-readable text to display
            code39.ShowText = True
            'Set barcode image foregroud color
            code39.BarcodeColor = Color.Black
            'Set barcode image back ground color
            code39.BackgroundColor = Color.White
            'Set barcode image format
            code39.PictureFormat = ImageFormat.Bmp
            'Save barcode image to file
            code39.CreateBarcode("code39-vb.bmp")

        End Sub
    End Class
End Namespace