以文本方式查看主题

-  Foxtable(狐表)  (http://foxtable.net/bbs/index.asp)
--  专家坐堂  (http://foxtable.net/bbs/list.asp?boardid=2)
----  统计  (http://foxtable.net/bbs/dispbbs.asp?boardid=2&id=68195)

--  作者:fanjq8686
--  发布时间:2015/5/12 11:01:00
--  统计

请教老师:

 

添加统计列到Totals集合中的语法是: 

Totals.AddDef(Name)
Totals.AddDef(Name, Caption)
Totals.AddDef(Name, Aggregate)
Totals.AddDef(Name, Aggregate,Caption)

参数说明

Name:      字符型,指定统计列
Caption:  字符型,指定统计列的标题
Aggregate: AggregateEnum枚举型,用于指定统计类型,默认是求和。

AggregateEnum型枚举的可选值:

Average:平均值
Count:  记录数
Max:    最大值
Min:    最小值
Sum:    累积值

 

“Count:  记录数”这个参数怎么用?给个简单的例子好吗?


--  作者:Bin
--  发布时间:2015/5/12 11:06:00
--  

示例五,统计不同客户在1999年各季度下的订单数,以及总的订购数量

复制以下代码至命令窗口: 

Dim b As New GroupTableBuilder("统计表1",DataTables("订单"))
b.Filter = "[日期] >= #1/1/1999# And [日期]<= #12/31/1999#"
b.Groups.AddDef(
"客户")\'添加客户列用于分组
\'添加日期列用于分组,按季度分组,并用"季度"代替原名称

b.Groups.AddDef(
"日期",DateGroupEnum.Quarter,"季度"
\'添加客户列用于统计,其实对于Count类型的统计,可用任何列作为统计列。

b.Totals.AddDef(
"客户",AggregateEnum.Count,"订单数"
b.Totals.AddDef(
"数量","订购数量"\'添加数量列用于统计
b.Build \'生成统计表
MainTable = Tables("统计表1"\'打开生成的统计表

执行结果:

图片点击可在新窗口打开查看


--  作者:fanjq8686
--  发布时间:2015/5/12 11:13:00
--  
谢谢