Foxtable(狐表)用户栏目专家坐堂 → [求助]分组统计设置分组列的代码请教


  共有1958人关注过本帖树形打印复制链接

主题:[求助]分组统计设置分组列的代码请教

帅哥哟,离线,有人找我吗?
hanzhang98
  1楼 | 信息 | 搜索 | 邮箱 | 主页 | UC


加好友 发短信
等级:一尾狐 帖子:493 积分:3637 威望:0 精华:0 注册:2018/6/8 21:14:00
[求助]分组统计设置分组列的代码请教  发帖心情 Post By:2019/9/2 17:49:00 [只看该作者]

老师好。帮助文档中(附图),在Groups集合中添加一个分组列的语法代码请教

Dim b As New GroupTableBuilder("统计表1",DataTables("订单"))
b.Groups.AddDef("产品编码","","产品类别", "产品名称" )   '设置分组列/ /NewName给分组列指定一个新的名称/NewCaption给分组列设置标题

请教老师:想按“产品编码”列为分组列,但又想在生成的统计表中,其名称不要显示为产品编码,比如“0101”,而是显示为该产品编码对应的“产品名称”,但上述代码报错,应如何写才对。还是我的理解就不对。谢谢。


图片点击可在新窗口打开查看此主题相关图片如下:qq截图20190902172747.png
图片点击可在新窗口打开查看



[此贴子已经被作者于2019/9/2 17:53:27编辑过]

 回到顶部
帅哥,在线噢!
有点蓝
  2楼 | 信息 | 搜索 | 邮箱 | 主页 | UC


加好友 发短信
等级:超级版主 帖子:107019 积分:544326 威望:0 精华:9 注册:2015/6/24 9:21:00
  发帖心情 Post By:2019/9/2 19:53:00 [只看该作者]

b.Groups.AddDef("产品类别")
b.Groups.AddDef("产品名称" )

 回到顶部
帅哥哟,离线,有人找我吗?
hanzhang98
  3楼 | 信息 | 搜索 | 邮箱 | 主页 | UC


加好友 发短信
等级:一尾狐 帖子:493 积分:3637 威望:0 精华:0 注册:2018/6/8 21:14:00
  发帖心情 Post By:2019/9/2 21:07:00 [只看该作者]

老师好. 不想做成"增加分组列"这样(不想要附图一那样), 想要附图二中直接用"部门名称"将"部门编码"替换掉. 谢谢

不想做成附图一这样:
图片点击可在新窗口打开查看此主题相关图片如下:附图一.png
图片点击可在新窗口打开查看

想要实现附图二:

图片点击可在新窗口打开查看此主题相关图片如下:附图二.png
图片点击可在新窗口打开查看


[此贴子已经被作者于2019/9/4 15:20:23编辑过]

 回到顶部
帅哥,在线噢!
有点蓝
  4楼 | 信息 | 搜索 | 邮箱 | 主页 | UC


加好友 发短信
等级:超级版主 帖子:107019 积分:544326 威望:0 精华:9 注册:2015/6/24 9:21:00
  发帖心情 Post By:2019/9/2 21:37:00 [只看该作者]

Dim g As New GroupTableBuilder("汇总1", DataTables("薪资表"))    
g.Groups.AddDef("部门名称")
g.Totals.AddDef("姓名", AggregateEnum.Count, "", "计资人数")
……

 回到顶部
帅哥哟,离线,有人找我吗?
hanzhang98
  5楼 | 信息 | 搜索 | 邮箱 | 主页 | UC


加好友 发短信
等级:一尾狐 帖子:493 积分:3637 威望:0 精华:0 注册:2018/6/8 21:14:00
  发帖心情 Post By:2019/9/2 21:50:00 [只看该作者]

老师好. 之前就是用"部门名称" 做分组列的, 但它的排序也是按"部门名称"的打头汉语拼音来排序的, 打乱了原有的排序顺序.  因此才想到将"部门编码"做为分组列, 这样虽然排序问题是解决了, 但是, 汇总出来的标题也变成了"0101 \ 0102 \ 0103" , 使用者还得查阅"0101" 是那个部门, 使用起来又不直观清楚了. 所以 才 请教老师 , 能不能将汇总结果中的"部门编码" 替换为"部门名称".   如能实现的话, 既能解决排序问题, 又能解决直观显示问题.  谢谢.
[此贴子已经被作者于2019/9/2 21:55:20编辑过]

 回到顶部
帅哥,在线噢!
有点蓝
  6楼 | 信息 | 搜索 | 邮箱 | 主页 | UC


加好友 发短信
等级:超级版主 帖子:107019 积分:544326 威望:0 精华:9 注册:2015/6/24 9:21:00
  发帖心情 Post By:2019/9/2 21:55:00 [只看该作者]

那就都添加进来,然后把部门编码列隐藏

Dim g As New GroupTableBuilder("汇总1", DataTables("薪资表"))   
g.Groups.AddDef("部门编码") 
g.Groups.AddDef("部门名称")
g.Totals.AddDef("姓名", AggregateEnum.Count, "", "计资人数")
……

 回到顶部
帅哥哟,离线,有人找我吗?
hanzhang98
  7楼 | 信息 | 搜索 | 邮箱 | 主页 | UC


加好友 发短信
等级:一尾狐 帖子:493 积分:3637 威望:0 精华:0 注册:2018/6/8 21:14:00
  发帖心情 Post By:2019/9/2 22:10:00 [只看该作者]

引用 蓝老师: "那就都添加进来,然后把部门编码列隐藏" .   完美. 谢谢. 

 回到顶部