Foxtable(狐表)用户栏目专家坐堂 → 数据统计表数据,如何写入事先编辑的表中


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

主题:数据统计表数据,如何写入事先编辑的表中

帅哥,在线噢!
y2287958
  1楼 | 信息 | 搜索 | 邮箱 | 主页 | UC


加好友 发短信
等级:狐神 帖子:4773 积分:34673 威望:0 精华:0 注册:2008/8/31 22:44:00
  发帖心情 Post By:2018/10/28 0:40:00 [显示全部帖子]

没看懂。
可以用filler将结果复制过去的
[此贴子已经被作者于2018/10/28 8:40:14编辑过]

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


加好友 发短信
等级:狐神 帖子:4773 积分:34673 威望:0 精华:0 注册:2008/8/31 22:44:00
  发帖心情 Post By:2018/10/28 14:44:00 [显示全部帖子]

上实例

 回到顶部
帅哥,在线噢!
y2287958
  3楼 | 信息 | 搜索 | 邮箱 | 主页 | UC


加好友 发短信
等级:狐神 帖子:4773 积分:34673 威望:0 精华:0 注册:2008/8/31 22:44:00
  发帖心情 Post By:2018/10/28 16:53:00 [显示全部帖子]

你的最终目的是“新统计表”吧,一定要那些中间表吗?
可以直接统计得到“新统计表”的

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


加好友 发短信
等级:狐神 帖子:4773 积分:34673 威望:0 精华:0 注册:2008/8/31 22:44:00
  发帖心情 Post By:2018/10/28 19:30:00 [显示全部帖子]

直接分组统计就行了

 回到顶部
帅哥,在线噢!
y2287958
  5楼 | 信息 | 搜索 | 邮箱 | 主页 | UC


加好友 发短信
等级:狐神 帖子:4773 积分:34673 威望:0 精华:0 注册:2008/8/31 22:44:00
  发帖心情 Post By:2018/10/28 22:30:00 [显示全部帖子]

Dim b As New GroupTableBuilder("统计表1",DataTables("学生成绩"))
b.Groups.AddDef("姓名")
b.Totals.AddDef("语文","分数_语文")
b.Totals.AddDef("数学","分数_数学")
b.Totals.AddDef("英语","分数_英语")
b.Totals.AddDef("化学","分数_化学")
b.Totals.AddDef("物理","分数_物理")

DataTables("新统计表").DataRows.Clear
Dim f As New Filler
f.SourceTable = b.Build(True)
f.DataTable = DataTables("新统计表")
f.Fill()

MainTable = Tables("新统计表")


 回到顶部