How to Generate PDF 417 in C# and VB.NET

using System;
using System.Drawing;
using System.Drawing.Imaging;
using PQScan.BarcodeCreator;

namespace PDF417GeneratorInCSharp
{
    classProgram
    {
        staticvoid Main(string[] args)
        {

            //Create an instance of PQScan.BarcodeCreator.Barcode object.
            Barcode pdf417 = new Barcode();
            //Set barcode date to encode
            pdf417.Data = "pqScan123456789";
            //Set barcode type
            pdf417.BarType = BarCodeType.PDF417;
            //Set barcode image width
            pdf417.Width = 300;
            //Set barcode image height
            pdf417.Height = 200;
            //Set pdf417 compact/truncated
            pdf417.PDF417Compact = false;
            //Set barcode image fore groud color
            pdf417.BarcodeColor = Color.Black;
            //Set barcode image back ground color
            pdf417.BackgroundColor = Color.White;
            //Set barcode image format
            pdf417.PictureFormat = ImageFormat.Png;
            //Save barcode image to file
            pdf417.CreateBarcode("pdf417-csharp.png");
        }
    }
}

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

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

            'Create an instance of PQScan.BarcodeCreator.Barcode object.
            Dim pdf417 As New Barcode()
            'Set barcode date to encode
            pdf417.Data = "pqScan123456789"
            'Set barcode type
            pdf417.BarType = BarCodeType.PDF417
            'Set barcode image width
            pdf417.Width = 300
            'Set barcode image height
            pdf417.Height = 200
            'Set pdf417 compact/truncated
            pdf417.PDF417Compact = False
            'Set barcode image fore groud color
            pdf417.BarcodeColor = Color.Black
            'Set barcode image back ground color
            pdf417.BackgroundColor = Color.White
            'Set barcode image format
            pdf417.PictureFormat = ImageFormat.Png
            'Save barcode image to file
            pdf417.CreateBarcode("pdf417-vb.png")
        End Sub
    End Class
End Namespace