VB.NET——报表
阅读原文时间:2023年07月16日阅读:1

在工具箱查找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 报表的使用

手机扫一扫

移动阅读更方便

阿里云服务器
腾讯云服务器
七牛云服务器

你可能感兴趣的文章