以文本方式查看主题

-  Foxtable(狐表)  (http://foxtable.net/bbs/index.asp)
--  专家坐堂  (http://foxtable.net/bbs/list.asp?boardid=2)
----  如何按周或日统计  (http://foxtable.net/bbs/dispbbs.asp?boardid=2&id=177767)

--  作者:lgz518
--  发布时间:2022/6/2 17:41:00
--  如何按周或日统计
下面代码是月度统计
Dim b As New GroupTableBuilder("统计表1",DataTables("订单"))
b.Groups.AddDef(
"日期","月份"\'
b.Totals.AddDef("数量"\'
b.Totals.AddDef("金额"\'
b.Build 
\'
MainTable = Tables("统计表1"\'

按周统计,下面代码,没报错,也没执行,请老师纠正,谢谢
Dim b As New GroupTableBuilder("统计表1",DataTables("订单"))
b.Groups.AddDef(
"日期","周"\'
b.Totals.AddDef("数量"\'
b.Totals.AddDef("金额"\'
b.Build 
\'
MainTable = Tables("统计表1"\'


按日统计

Dim b As New GroupTableBuilder("统计表1",DataTables("订单"))
b.Groups.AddDef(
"日期","日"\'
b.Totals.AddDef("数量"\'
b.Totals.AddDef("金额"\'
b.Build 
\'
MainTable = Tables("统计表1"\'


--  作者:狐狸爸爸
--  发布时间:2022/6/2 17:44:00
--  
参考:
http://www.foxtable.com/webhelp/topics/0677.htm


关键:

DateGroupEnum枚举的可选值:

None :     不分组
Year:      按年分组
Quarter:   按季度分组
Month:     按月分组
Week:      按周分组
Day:       按天分组,月中的某一天。
Hour:      按小时分组
Minute:    按分钟分组
Second:    按秒分组