- Foxtable(狐表) (http://foxtable.net/bbs/index.asp)
-- 专家坐堂 (http://foxtable.net/bbs/list.asp?boardid=2)
---- 一个简单的统计问题,把我搞晕了 (http://foxtable.net/bbs/dispbbs.asp?boardid=2&id=18173)
-- 发布时间：2012/4/5 13:57:00
-- 一个简单的统计问题,把我搞晕了
此主题相关图片如下：1.jpg
如图:我有一表要分组统计,要打到如下效果:
此主题相关图片如下：2.jpg
但是因为有相同的姓名,怎么统计人数都多出来,这个分组统计该怎么写?
-- 发布时间：2012/4/5 14:02:00
--
这个用菜单也行，用代码也行：
Dim g As New GroupTableBuilder("统计表1", DataTables("表A"))
g.Groups.AddDef("车间")
g.Totals.AddDef("姓名", AggregateEnum.Count, "人数")
g.Totals.AddDef("夜班补贴")
g.Build()
MainTable = Tables("统计表1")
-- 发布时间：2012/4/5 17:35:00
--
狐狸爸爸,你的代码我试过了,统计结果不对,如图; 我又认真阅读了帮助文件关于分组统计的文档,还是不行,大家可以试试,问题出在哪?
此主题相关图片如下：3.jpg
-- 发布时间：2012/4/5 22:10:00
--
看来是FOXTABLE软件BUG，把人数统计，变成了人次统计.
-- 发布时间：2012/4/5 22:11:00
--
有没有别的替代办法解决？
-- 发布时间：2012/4/5 22:28:00
--
顶一下，不知如何加入代码，去除重复的姓名。
-- 发布时间：2012/4/6 5:36:00
--
最笨的方法是：
Dim g As New GroupTableBuilder("aa", DataTables("表A"))
g.Groups.AddDef("第一列")
g.Groups.AddDef("第二列")
g.Totals.AddDef("第二列",AggregateEnum.Count)
g.Totals.AddDef("第三列")
g.Build()
Dim g1 As New GroupTableBuilder("统计表3", DataTables("aa"))
g1.Groups.AddDef("第一列")
g1.Totals.AddDef("第二列", AggregateEnum.Count)
g1.Totals.AddDef("第三列")
g1.Build()
MainTable = Tables("aa")
Syscmd.Table.Delete()
MainTable = Tables("统计表3")
MainTable = Tables("统计表3")
-- 发布时间：2012/4/6 5:41:00
--
嘿嘿
-- 发布时间：2012/4/6 9:24:00
--
收藏起来
-- 发布时间：2012/4/6 17:37:00
--
太妙了，这样也可以！