0

我正在尝试在我的应用程序中创建报告。我在我的应用程序中添加了一个 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
4

0 回答 0