ReportViewer不连接数据库,自定义DataSet导出到报表时,只显示标题,数据未显示
实在查不出什么原因,应该是一个很小的地方出错,恳请大神指导,万分感谢
参照:https://www.cnblogs.com/bfyx/archive/2012/12/17/2821264.html
报表中数据集和数据源设定
代码
Public Class Form1
Private Sub Form1_Load(sender As Object, e As EventArgs) Handles MyBase.Load
Dim dt As DataTable
dt = New DataTable
dt.Columns.Add("row1", GetType(String))
dt.Columns.Add("row2", GetType(String))
Dim i As Integer
For i = 0 To i < 6
Dim dr As DataRow
dr = dt.NewRow
dr(0) = "a"
dr(1) = "b"
dt.Rows.Add(dr)
Next
ReportViewer1.LocalReport.ReportPath = "Report1.rdlc"
'//指定数据集,数据集名称后为表,不是DataSet类型的数据集
Me.ReportViewer1.LocalReport.DataSources.Clear()
Me.ReportViewer1.LocalReport.DataSources.Add(New Microsoft.Reporting.WinForms.ReportDataSource("message", dt))
Me.ReportViewer1.RefreshReport()
End Sub
End Class