机房重构--添加报表

来源:互联网 发布:血与酒 石之心 知乎 编辑:程序博客网 时间:2024/06/06 01:11

  VS中自带报表功能,方便我们不使用第三方控件便可以实现报表功能。本文来介绍一下如何在VS中实现报表功能。

  首先在项目下添加报表 添加--新建项--Reporting--报表

 

  在上图界面中右键点击--插入--

  

  点击新建数据源--选择数据库--点击下一步即可 

  

  出现下图界面时按提示操作即可,点击测试连接可测试是否连接成功 


 点击确定后,继续下一步出现下图界面,选择数据集对象

 

 点击完成后,开始制作报表,按图操作即可(数据框右上角可选择对应数据项)

 制作完成后效果如下

 

 From窗体上添加ReportViewer报表容器控件,点击控件右上角三角选择报表

 

  接下来配置报表,生成代码按下图所示操作即可

 

  至此添加报表功能完成,具体代码如下:

Imports Microsoft.Reporting.WinFormsPublic Class frmReports    Private Sub frmReports_Load(sender As Object, e As EventArgs) Handles MyBase.Load        'TODO: 这行代码将数据加载到表“chargeDataSet.Account”中。您可以根据需要移动或删除它。        ' Me.AccountTableAdapter.Fill(Me.chargeDataSet.Account)        Me.ReportView1.RefreshReport()    End Sub    Private Sub btnInquiry_Click(sender As Object, e As EventArgs) Handles btnQuery.Click        Dim daychecksource As New ReportDataSource        '设置报表数据源名称          daychecksource.Name = "DataSet1"        '设置报表数据源实例          daychecksource.Value = JFreports.Account        Me.ReportView1.LocalReport.ReportEmbeddedResource = "UI.Report1.rdlc"        '清空存在报表           Me.ReportView1.LocalReport.DataSources.Clear()        '添加数据源          Me.ReportView1.LocalReport.DataSources.Add(daychecksource)        '传递参数            Me.AccountTableAdapter.Fill(Me.JFreports.Account, Format(dtpStart.Value, "yyyy-MM-dd"), Format(dtpEnd.Value, ("yyyy-MM-dd")))        '刷新报表          Me.ReportView1.RefreshReport()    End SubEnd Class
  

  本篇文章到此结束,如有任何问题欢迎大家指正,万分感谢!