C# と VB.NET の質問掲示板

OS:Windows7(64bit)
VB2010+CrystalReport1forVS2010

DataGridViewの内容をCrystalReportに印刷したく、
DataGridViewのDataSourceである、
DataSet1のDataTable1をDataSourceとしたのですが、

FileNotFoundExceptionはハンドルされませんでした。
が発生します。
DataTableにはデータが入っているのですが、
入っていないと認識している様子です。

なにか記述が間違っているのでしょうか？
御存知の方がおられたらお教え願います。


実行ソース

            Dim ds As DataSet1 = New DataSet1()
            Dim dr As DataRow

            dr = ds.DataTable1.NewRow
            dr("ID") = "AAA"
            dr("NAME") = "1234567890"
            ds.DataTable1.Rows.Add(dr)

            If ds.DataTable1.Count <> 0 Then
                Dim cr As CrystalDecisions.CrystalReports.Engine.ReportClass = New CrystalReport1
                cr.SetDataSource(ds)

                CrystalReportViewer1.ReportSource = cr
                CrystalReportViewer1.Refresh()
            End If