我的水晶无法填充两张桌子上的任何东西

Question

显示未付发票的日常报告的功能

Public Sub DayToDayUnpaidInvoice()
    Try
        connection.Open()
        CrystalReportViewer1.Refresh()
        Dim sql As String = "SELECT tblclientinfo.Client_ID, tblclientinfo.C_name, tblclientinfo.C_surname, tblinv_info.inv_Num , tblinv_info.Inv_date  
                            FROM tblclientinfo,tblinv_info 
                            WHERE tblclientinfo.Client_ID = tblinv_info.Client_ID AND inv_paid = 'N' OR inv_paid = '' 
                            ORDER BY inv_date ASC;"
        cmd = New MySqlCommand(sql, connection)
        da = New MySqlDataAdapter()
        da.SelectCommand = cmd
        ds = New DataSet
        da.Fill(ds, "tblclientinfo")
        Dim report As New DayToDayUnpaid
        report.SetDataSource(ds)
        CrystalReportViewer1.ReportSource = report
        CrystalReportViewer1.Refresh()
        cmd.Dispose()
        da.Dispose()
        ds.Dispose()
        connection.Close()
    Catch ex As Exception
        MsgBox(ex.Message)
        connection.Close()
    End Try
End Sub

Answer 1

改变这个：

report.SetDataSource(ds)

到这里

report.SetDataSource(ds.Tables(0))