在 ActiveReports 中可以设置单级分组、嵌套分组，同时，还可以使用表格、列表以及矩阵等数据区域控件对数据源进行分组操作。分组报表在商业报表系统中应用不胜枚举，客户信息归类统计表、商品分类统计表、销售记录年度、阅读统计等等。本文将介绍如何在 ActiveReports 中实现分组报表。
1、创建报表文件
在应用程序中添加一个 ActiveReports 报表文件，使用的项目模板类型为 ActiveReports 页面报表。添加完成之后从 VS 报表菜单中选择报表属性菜单项，并在外观选项卡中设置报表页边距为 1cm
2、打开报表资源管理器，并按照以下信息创建报表数据源
| 名称： | NWind_CHS |
| 类型： | Micorsoft OleDb Provider |
| OLE DB 提供程序： | Microsoft.Jet.OLEDB.4.0 |
| 服务器或文件名称： | DataNWind_CHS.mdb |
3、 添加数据集
在新建的 NWind_CHS 数据源上鼠标右键并选择添加数据集菜单项，数据集信息如下：
常规-名称：Products
查询-查询：
SELECT
产品.*,类别.类别名称,类别.说明
AS
类别说明,类别.图片
AS
类别图片, 供应商.公司名称
AS
供应商,供应商.联系人姓名,供应商.城市,供应商.地址
FROM
(供应商
INNERJOIN
产品
ON
供应商.供应商ID = 产品.供应商ID)
INNERJOIN
类别
ON
产品.类别ID = 类别.类别ID
ORDERBY
产品.类别ID;
4、设计报表界面
选中报表的第一页 Page1，点击属性窗口命令区域中【属性对话框】命令链接，在出现的设置对话框中设置以下信息：
| 常规-数据集名称： | Products |
| 分组-表达式： | =[类别名称] |
4.1、从 VS 工具箱中将 Table 控件添加到报表设计界面，设置 Table1 的 FixedSize 为 19cm * 25cm，并按照以下信息各个数据单元格的属性：
| 单元格行列索引 | 控件 | 属性 |
| Cells[1,1] | TextBox | Value=First(Fields!类别名称.Value) & " (" & First(Fields!类别说明.Value) & ")" |
| Cells[3,1] | TextBox | Value=Fields!产品名称.Value |
| Cells[3,2] | TextBox | Value=Fields!单位数量.Value |
| Cells[3,3] | TextBox | Value=Fields!单价.Value |
| Cells[3,4] | TextBox | Value=Fields!订购量.Value |
| Cells[3,5] | TextBox | Value=Fields!再订购量.Value |
| Cells[3,6] | TextBox | Value=Fields!单价.Value * Fields!订购量.Value |
| Cells[3,7] | Image | Value=IconSet("Symbols2",Fields!中止.Value = 0,False,Fields!中止.Value * -1,False,False) |
| Cells[4,5] | TextBox | Value=Sum(Fields!订购量.Value, "Table1") |
| Cells[5,5] | TextBox | Value=Sum(Fields!库存量.Value, "Table1") |
| Cells[6,5] | TextBox | Value=Sum(Fields!单价.Value * Fields!订购量.Value, "Table1") |
最终得到的设计界面如下图所示：
5、运行程序
通过 F5 键运行程序，得到以下运行结果：
在线演示及源码下载地址：
http://www.gcpowertools.com.cn/products/activereports_demo.htm
