共6 条记录, 每页显示 10 条, 页签:
[1]
[浏览完整版]
标题：统计问题
1楼
lrh9537 发表于：2024/2/29 9:58:00请指点下：代码提示出错，
此主题相关图片如下：01.png
把户类型列修改为“脱贫户”，增加“合计”列，
此主题相关图片如下：01.png把户类型列修改为“脱贫户”，增加“合计”列，
户类型列有：
脱贫户
脱贫不享受政策户
农户
Dim g As New GroupTableBuilder("统计表", DataTables("户信息表"))
g.Groups.AddDef("乡镇")
g.Totals.AddDef("户类型", AggregateEnum.Count)
g.Totals.AddDef("户类型", "户类型_脱贫户")
g.Totals.AddDef("户类型", "户类型_脱贫不享受政策户")
g.Totals.AddDef("户类型", "户类型_农户")
g.Totals.AddDef("易返贫致贫户监测对象类型", AggregateEnum.Count)
g.VerticalTotal = True
g.Build()
MainTable = Tables("统计表")
2楼
有点蓝 发表于：2024/2/29 10:07:00用交叉统计：http://www.foxtable.com/webhelp/topics/0678.htm
Dim b As New CrossTableBuilder("统计表1",DataTables("户信息表"))
b.HGroups.AddDef("乡镇")
b.VGroups.AddDef("户类型")
b.Totals.AddDef("户类型",AggregateEnum.Count)
b.Totals.AddDef("易返贫致贫户监测对象类型",AggregateEnum.Count)b.HGroups.AddDef("乡镇")
b.VGroups.AddDef("户类型")
b.Totals.AddDef("户类型",AggregateEnum.Count)
b.Build '生成统计表
Maintable = Tables("统计表1") '打开生成的统计表
Maintable = Tables("统计表1") '打开生成的统计表
3楼
lrh9537 发表于：2024/2/29 10:11:00每一类增加“合计列”，最后一行再增加“合计行”怎么增加？
4楼
有点蓝 发表于：2024/2/29 10:35:005楼
lrh9537 发表于：2024/2/29 15:36:00如下代码生成的统计表看着有点杂乱，想达到图片03的效果怎么办？
Dim b As New CrossTableBuilder("统计表", DataTables("户信息总表"))
b.HGroups.AddDef("乡镇")
b.VGroups.AddDef("户类型", "脱贫户")
b.VGroups.AddDef("易返贫致贫户监测对象类型")
b.Totals.AddDef("户类型", AggregateEnum.Count)
b.Totals.AddDef("易返贫致贫户监测对象类型", AggregateEnum.Count)
b.Subtotal = True '生成汇总模式
B.SubtotalLevel = 0 '只生成总计行
b.Build '生成统计表
Maintable = Tables("统计表") '打开生成的统计表
[此贴子已经被作者于2024/3/1 16:41:35编辑过]
6楼
有点蓝 发表于：2024/2/29 16:24:00那就只能手工创建表结构和手工统计了
共6 条记录, 每页显示 10 条, 页签:
[1]