我正在尝试在我的应用程序中创建报告。我在我的应用程序中添加了一个 DataSet 组件,我正在尝试从 DB 中查询一些数据并将其加载到该数据集中以在我的报告中使用。这就是我正在做的事情(基本上根据先前的参数调用一个函数)
Private Sub GrabReportData(ByVal RepNo As Integer)
Conn.Open()
Dim adapter As SqlDataAdapter
Dim reportDataset As DataSet
Dim sql As String = "SELECT FirstName, LastName from tblCustNotes"
adapter = New SqlDataAdapter(sql, Conn)
adapter.Fill(reportDataset, "DataTable1")
End Sub
我在这里添加了一个 DataTable1 但是当我运行这段代码时,我得到了这个错误......
值不能为空。
但是我知道我在那里有数据。
我希望能够填充 ReportDataSet 组件并将其用作我的报告的数据源。第一次做这个,有点吃力。我更像是一个 MS Access 人:/
编辑:
每个@Plutonix 都这样做了...
删除了 ReportDataSet 组件
Dim reportDataset As New DataSet
Dim sql As String = "SELECT FirstName, LastName from tblCustNotes"
Using adapter As SqlDataAdapter = New SqlDataAdapter(sql, Conn)
adapter.Fill(reportDataset, "DataTable1")
ReportViewer1.LocalReport.DataSources.Clear()
ReportViewer1.LocalReport.DataSources.Add(reportDataset.tables(0))
End Using