rdlc报表教程怎么分栏呢，请高手指点

来源：蜘蛛抓取(WebSpider) 时间：2016-11-24 23:42 标签： c rdlc报表
您的网站因未备案或涉及违规被禁止访问，请及时联系实际接入商办理备案.<!DOCTYPE HTML PUBLIC "-//W3C//DTD HTML 4.01 Transitional//EN"
您的访问请求被拒绝 403 Forbidden - ITeye技术社区
您的访问请求被拒绝
亲爱的会员，您的IP地址所在网段被ITeye拒绝服务，这可能是以下两种情况导致：
一、您所在的网段内有网络爬虫大量抓取ITeye网页，为保证其他人流畅的访问ITeye，该网段被ITeye拒绝
二、您通过某个代理服务器访问ITeye网站，该代理服务器被网络爬虫利用，大量抓取ITeye网页
请您点击按钮解除封锁&2141人阅读
.net（19）
RDLC报表的使用
&&&&&& 机房收费系统这是第三遍重构了，但每当到报表这块都是让我很纠结，这次合作开发亦是如此。在学习vb6时，使用的报表是第三方的Grid&#43;&#43;Report；VB.Net个人版以及合作版使用的是在VS .NET自带的报表设计器，Microsoft 将这种报表的后缀定为RDLC.
&&&&&&& RDLC（Report Definition Language Client）是微软基于RDL在.NET上继续完善的结果。
&&&&&&& 下面就以机房收费系统的“账单查询”为例，开始制作一张简单报表，显示结果如下：
一、制作步骤：
&&&&&& 1.在建好的VS窗体项目“机房收费系统”建立一个Form窗体:账单查询。
&&&&&&&2.添加数据源。
&&&&&& 在左边的窗体内选择“添加新数据源”或在菜单上操作选择“添加新数据源“。
&&&&&&& 选择后出现对话框，选择数据库，进入下一步。
&&&&&&& 选定数据源后，指定数据库文件，并进行测试，如果连接不通，请检查你的软件配置。
&&&&& 进行下一步，至显示出库文件内的表及视图，然后打开表，并选择其中的T_CheckOut,选择完成。
&&&&&& 在数据源窗口中显示出所选择表及表内字段，以备使用。
&&&&&&& 同时在资源管理器窗口中，也可以看到新增加的数据文件。
3.报表浏览器
&&&&&&& 在新建的窗体内，放入报表浏览器控件。
4.建立报表文件
&&&&选中报表浏览器控件后，在控件的右上角会出现一个小三角，出现一个菜单，选择“建设新报表”或在解决方案资源管理器中添加一个新的报表文件：
&&&&设计报表的过程此文写的很详细，不明白的可以参考： ,在此就不赘述。
&&&&我的报表模板的最后显示结果如下图：
&&& 这里提一下，数据行数据填充，在其“表达式”中可以看到：
&4.编码部分（这里只贴了界面层的代码）：
Imports System
Imports Microsoft.Reporting.WinForms
Public Class QueryBillUI
Dim myFA As New Facade.BillManagementFA
Dim dt As DataTable
''' &summary&
''' 窗体加载事件
''' &/summary&
''' &param name=&sender&&&/param&
''' &param name=&e&&&/param&
''' &remarks&&/remarks&
Private Sub WeekBillUI_Load(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles MyBase.Load
Me.ReportViewer1.RefreshReport()
Dim num As Integer
'获取操作员用户名和真实姓名
dt = myFA.SelectUser()
'获取cboUserID集合中的&#20540;
cboUserID.Items.Add(&所有&)
'默认&#20540;：“所有”，并将其转换为&*&
num = dt.Rows.Count
'从数据库中读取过来的&#20540;。
While num & 0
cboUserID.Items.Add(Trim(dt.Rows(num - 1)(&用户名&)))
'获取DataTable表中某行某列的&#20540;赋给cboUserID集合中
num = num - 1
cboUserID.SelectedIndex = 0
'设置组合框的默认&#20540;为“所有”。
Me.ReportViewer1.RefreshReport()
Private Sub btnQuery_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles btnQuery.Click
Dim enCheckOut As New Entity.CheckOutEntity
Dim strUserID As String
'此变量用于保存“用户名”
strUserID = cboUserID.Text.Trim()
If strUserID = &所有& Then
strUserID = &*&
enCheckOut.UserID = strUserID
enCheckOut.BeginDate = Format(dtpStartDate.Value, &yyyy-MM-dd&)
enCheckOut.EndDate = Format(dtpEndDate.Value, &yyyy-MM-dd&)
dt = myFA.QueryBill(enCheckOut)
Catch ex As Exception
MessageBox.Show(ex.Message.ToString())
'声明一个报表数据源对象
Dim rptDataSource As New ReportDataSource
'设置报表数据源名称
rptDataSource.Name = &T_CheckOut&
'设置报表数据源实例
rptDataSource.Value = dt
'设置嵌入报表的资源的名称
'ReportViewer1.LocalReport.ReportEmbeddedResource = &UI.ReportBill.rdlc&
ReportViewer1.LocalReport.ReportEmbeddedResource = &ReportBill.rdlc&
'清空数据源
ReportViewer1.LocalReport.DataSources.Clear()
'添加报表数据源
ReportViewer1.LocalReport.DataSources.Add(rptDataSource)
'设置报表中的参数集合，传递的参数，名字大小写必须一致。
'且其本身数据类型必须与报表中定义的数据类型也必须一致。
'Dim params() As ReportParameter = {New ReportParameter(&DateStart&, Date.Parse(dtpStartDate.Text)), New ReportParameter(&DateEnd&, Date.Parse(dtpEndDate.Text))}
Dim params() As ReportParameter = {New ReportParameter(&DateStart&, dtpStartDate.Text),
New ReportParameter(&DateEnd&, dtpEndDate.Text),
New ReportParameter(&UserID&, LoginUI._userID)}
'传递报表中的参数集合
ReportViewer1.LocalReport.SetParameters(params)
Me.ReportViewer1.RefreshReport()
二、运行结果
&&&&程序执行后，界面的运行结果如下图：
&&&&&&& 此文重点部分介绍的是“配置数据源”和“建立报表文件”中的参数设定。因为个人在这两部分理解不是很好，所以这次总结在这两部分画的笔墨有些多。
&&&&&&& 参考的文献：
&&&&&&&崔成龙— VB.NET rdlc报表的使用：
&&&&&&&&杨长收—VB.NET实现ReportViewer显示参数化查询结果：
&&&&邢金聪—图解机房收费系统报表制作的全过程：
参考知识库
* 以上用户言论只代表其个人观点，不代表CSDN网站的观点或立场
访问：314755次
积分：5011
积分：5011
排名：第4187名
原创：136篇
评论：739条
(2)(3)(4)(1)(4)(3)(4)(2)(4)(4)(1)(4)(4)(4)(4)(4)(4)(4)(5)(4)(4)(4)(3)(4)(4)(4)(4)(5)(20)(4)(4)(5)(2)(1)(1)本帖子已过去太久远了，不再提供回复功能。

我要回帖

更多关于 c rdlc报表 的文章

 

随机推荐