ActiveReports 报表应用教程 (10)

在 ActiveReports 中可以动态的显示或者隐藏某区域的数据,通过该功能用户可以根据需要显示或者隐藏所关心的数据,结合数据排序、过滤等功能可以让用户更方便地分析报表数据。

本文中展示的是销售数据分析表实现方法,该报表包含每年销售数据汇总图表,月度销售统计,以及每月销售明细属性。通过年度销售数据可以向下专区到月度销售数据,从月度销售数据可以向下钻取到月度销售明细数据,实现下图如下图:

ActiveReports 报表功能展示 向下钻取

1、创建报表文件

在应用程序中创建一个名为 rptDrollDown.rdlx 的 ActiveReports 报表文件,使用的项目模板为 ActiveReports 页面报表,创建完成之后从 VS 的报表菜单项中选择转换为连续页面布局(CPL)报表,将固定页面报表转换为连续页面报表。

2、打开报表资源管理器,并按照以下信息创建报表数据源

名称:NWind_CHS
类型:Micorsoft OleDb Provider
OLE DB 提供程序:Microsoft.Jet.OLEDB.4.0
服务器或文件名称:Data\NWind_CHS.mdb

 

3、 添加数据集

在新建的 NWind_CHS 数据源上鼠标右键并选择添加数据集菜单项

常规-名称:OrderDetails

查询-查询:

SELECT DatePart("yyyy",订单.订购日期) as 订购年,  DatePart("m",订单.订购日期) as 订购月, 订单.订单ID, 订单.客户ID, 订单.订购日期, 产品.产品名称,订单明细.数量, 订单明细.单价, 订单明细.折扣, 类别.类别名称  from ((( 订单
inner join 订单明细 on 订单.订单ID = 订单明细.订单ID )
inner join 产品 on 订单明细.产品ID = 产品.产品ID )
inner join 类别 on 产品.类别ID = 类别.类别ID)
ORDER BY DatePart("yyyy",订单.订购日期) DESC;

 

4、设计报表界面

从 Visual Studio 工具箱中将 BandedList 控件添加到报表设计界面,按照以下列表设置 BandedList 控件的属性:

常规-数据集名称:OrderDetails
分组-分组1:名称:BandedList1_Group1
表达式:=[订购年]
分组-分组2:名称:BandedList1_Group2
表达式:=[订购月]

在 BandedList1_Header 区域中添加以下控件,并设置相应属性:

TextBox123默认属性设置
TextBox14Value:=Fields!订购年.Value & " 年销售汇总"
TextBox8Value:=Sum(Fields!数量.Value * Fields!单价.Value * ( 1 - Fields!折扣.Value),"BandedList1_Group1")

在 BandedList1_Group1_Header 区域中添加以下控件,并设置相应属性:

Chart1常规-数据集名称:OrderDetails
系列值-系列标签:数量
系列值-值:=Sum([数量] * [单价] * (1 - [折扣]))
类别分组-名称:Chart1_CategoryGroup1
类别分组-表达式:=[类别名称]
类别分组-标签:=[类别名称]

 

在 BandedList1_Group2_Header 区域中添加以下控件,并设置相应属性:

TextBox3默认属性设置
TextBox15常规-值:=[订购月] & " 月销售明细"
TextBox11交互式排序选项卡的以下属性
为文本框添加交互式排序功能:True
排序表达式:=[订购月]
选择数据区域或者分组:BandedList1_Group1
选择数据区域或者分组:BandedList1_Group2
TextBox12常规-值:=Sum([数量] * [单价] * ( 1 - [折扣]),"BandedList1_Group2")
TextBox13交互式排序选项卡的以下属性
为文本框添加交互式排序功能:True
排序表达式=Sum([数量] * [单价] * ( 1 - [折扣]),"BandedList1_Group2")
选择数据区域或者分组:BandedList1_Group1
选择数据区域或者分组:BandedList1_Group2

 

在 BandedList1_Details 区域中添加以下控件,并设置相应属性:

TextBox10=Fields!订单ID.Value
TextBox4=Fields!产品名称.Value
TextBox5=Fields!数量.Value
TextBox6=Fields!单价.Value
TextBox7=Fields!折扣.Value
TextBox9=Fields!数量.Value * Fields!单价.Value * ( 1 - Fields!折扣.Value )

 

完成基本的报表界面设计之后,我们需要为报表添加向下钻取功能,在 ActiveReports 中是通过指定报表元素的Visibility属性来实现向下钻取操作,需要设置的元素如下:

BandedList1_Group2_HeaderVisibility.Hidden = True
Visibility.ToggleItem = TextBox123
BandedList1_DetailsVisibility.Hidden = True
Visibility.ToggleItem = TextBox123

 

5、运行程序

点击向下钻取图标以显示或者隐藏报表明细数据

ActiveReports 报表功能展示 向下钻取报表

源码下载地址:


http://www.gcpowertools.com.cn/products/activereports_demo.htm


<script type="text/javascript"> </script><script type="text/javascript" src="http://pagead2.googlesyndication.com/pagead/show_ads.js"></script>
  • 0
    点赞
  • 0
    收藏
    觉得还不错? 一键收藏
  • 0
    评论
评论
添加红包

请填写红包祝福语或标题

红包个数最小为10个

红包金额最低5元

当前余额3.43前往充值 >
需支付:10.00
成就一亿技术人!
领取后你会自动成为博主和红包主的粉丝 规则
hope_wisdom
发出的红包
实付
使用余额支付
点击重新获取
扫码支付
钱包余额 0

抵扣说明:

1.余额是钱包充值的虚拟货币,按照1:1的比例进行支付金额的抵扣。
2.余额无法直接购买下载,可以购买VIP、付费专栏及课程。

余额充值