通过控件制作报表后，带不出数据。代码如下：
   Dim rptDataSource As New ReportDataSource
        Dim dt As New DataTable
        rptDataSource.Name = "aa"
        rptDataSource.Value = dt

        ReportViewer1.LocalReport.ReportEmbeddedResource = "Report.Report2.rdlc"
        ReportViewer1.LocalReport.DataSources.Clear()
        ReportViewer1.LocalReport.DataSources.Add(rptDataSource)
        Me.ReportViewer1.RefreshReport()
请大侠指点，谢谢！

∵ DataTable 对像没有任何数据.
∴ 需要在这个 DataTable 中添加数据并测试

我预览的时候，表里有数据。

我是不是少了什么语句，能否帮忙写一下，谢谢！