How to create Crystal Reports featuring barcode images using Typed DataSet in .NET Windows Forms

Private Sub Form1_Load(ByVal sender As Object, ByVal e As System.EventArgs) Handles Me.Load

    'Filling Products DataTable from DB
    Dim ta As New NorthwindTableAdapters.ProductsTableAdapter()
    Dim dt As New Northwind.ProductsDataTable()
    ta.Fill(dt)

    'Create an instance of Barcode Professional
    Dim bcp As New Neodynamic.SDK.BarcodeProfessional()
    'Barcode settings
    bcp.Symbology = Neodynamic.SDK.Symbology.Code39
    bcp.Extended = true
    bcp.AddChecksum = false
    bcp.BarHeight = 0.4f

    'Append fictitious Company internal prefix
    Dim prodPrefix As String = "12345"

    Dim row As Northwind.ProductsRow    
    For Each row In dt.Rows
        'Set the value to encode
        bcp.Code = prodPrefix + row.ProductID.ToString()
        'Generate the barcode image and store it into the Barcode Column
        row.Barcode = bcp.GetBarcodeImage(System.Drawing.Imaging.ImageFormat.Png)
    Next

    'Create a report object
    'and set its data source with the DataSet
    Dim report As New CrystalReportBarcode()
    report.SetDataSource(CType(dt, DataTable))
     
    Me.CrystalReportViewer1.ReportSource = report
End Sub

private void Form1_Load(object sender, EventArgs e)
{
    //Filling Products DataTable from DB
    NorthwindTableAdapters.ProductsTableAdapter ta = new NorthwindTableAdapters.ProductsTableAdapter();
    Northwind.ProductsDataTable dt = new Northwind.ProductsDataTable();
    ta.Fill(dt);

    //Create an instance of Barcode Professional
    Neodynamic.SDK.BarcodeProfessional bcp = new Neodynamic.SDK.BarcodeProfessional();
    //Barcode settings
    bcp.Symbology = Neodynamic.SDK.Symbology.Code39;
    bcp.Extended = true;
    bcp.AddChecksum = false;
    bcp.BarHeight = 0.4f;

    //Append fictitious Company internal prefix
    string prodPrefix = "12345";

    //Update DataTable with barcode image
    foreach (Northwind.ProductsRow row in dt.Rows)
    {
        //Set the value to encode
        bcp.Code = prodPrefix + row.ProductID.ToString();
        //Generate the barcode image and store it into the Barcode Column
        row.Barcode = bcp.GetBarcodeImage(System.Drawing.Imaging.ImageFormat.Png);
    }

    //Create a report object
    //and set its data source with the DataSet
    CrystalReportBarcode report = new CrystalReportBarcode();
    report.SetDataSource((DataTable)dt);
     
    this.crystalReportViewer1.ReportSource = report;
}