VB.NET——报表

来源：互联网发布：雷洋死亡真相知乎编辑：程序博客网时间：2024/05/17 21:41

在工具箱查找ReportViewer，添加。

选择设计新报表：

排列字段，布局的步骤省略。

完成。

接下来，我们可以更改中文标题，设置背景色等，让界面看起来更美观。

如果需要添加参数，所传递的参数要与当初设置的类型一致。

 'NowDateTime是设置的日期时间类型的参数        Dim paras() As ReportParameter = {New ReportParameter("NowDateTime", Date.Parse(Now.ToShortTimeString))}        ''传递报表中的参数集合          ReportViewer1.LocalReport.SetParameters(paras)

代码部分：

 Dim query As New Login.Model.CheckBillInfo        Dim Bquery As New Login.BLL.CheckoutforBLL        '按照所选的日期区间进行查询        Dim Table As DataTable = Bquery.QueryCheckDay(Date.Parse(DateTimePicker1.Text), Date.Parse(DateTimePicker2.Text))        '声明一个报表数据源对象          Dim rptDataSource As New ReportDataSource        '设置报表数据源名称          rptDataSource.Name = "Test"        '设置报表数据源实例          rptDataSource.Value = Table        '设置嵌入报表的资源的名称          ReportViewer1.LocalReport.ReportEmbeddedResource = "LoginUI.Report4.rdlc"        '清空报表数据源          ReportViewer1.LocalReport.DataSources.Clear()        '添加报表数据源          ReportViewer1.LocalReport.DataSources.Add(rptDataSource)        ReportViewer1.ProcessingMode = ProcessingMode.Local        '刷新报表          Me.ReportViewer1.RefreshReport()

注意：数据源名称和嵌入报表的名称要一一对应好，否则就会出错

报表看着很麻烦，但只要静下心来去学习，就会弄好的。报表和之前的DatagridView类似，都是从数据库读取记录然后显示出来，然后做好细节部分，就OK了。

参考博客：《VB.NET rdlc 报表的使用》

2 0