在葡萄城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

((( 訂單

innerjoin

訂單明細

on

訂單.訂單ID = 訂單明細.訂單ID )

innerjoin

產品

on

訂單明細.產品ID = 產品.產品ID )

innerjoin

類別

on

產品.類別ID = 類別.類別ID)

ORDERBY

DatePart("yyyy",訂單.訂購日期)

DESC

;

?

4、設計報表界面

從 Visual Studio 工具箱中將 BandedList 控件添加到報表設計界面，按照以下列表設置 BandedList 控件的屬性：

常規-數據集名稱：	OrderDetails
分組-分組1：	名稱：BandedList1_Group1 表達式：=[訂購年]
分組-分組2：	名稱：BandedList1_Group2 表達式：=[訂購月]

?

在 BandedList1_Header 區域中添加以下控件，并設置相應屬性：

TextBox123	默認屬性設置
TextBox14	Value：=Fields!訂購年.Value & " 年銷售匯總"
TextBox8	Value：=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_Header	Visibility.Hidden = True Visibility.ToggleItem = TextBox123
BandedList1_Details	Visibility.Hidden = True Visibility.ToggleItem = TextBox123

?

5、運行程序

點擊向下鉆取圖標以顯示或者隱藏報表明細數據

源碼下載地址：

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

相關閱讀：

【報表福利大放送】100余套報表模板免費下載?

?矩表 - 現代數據分析中必不可少的報表工具

?

總結

以上是生活随笔為你收集整理的ActiveReports 报表应用教程 (10)---交互式报表之向下钻取（详细数据按需显示解决方案）...的全部內容，希望文章能夠幫你解決所遇到的問題。

如果覺得生活随笔網站內容還不錯，歡迎將生活随笔推薦給好友。