Foxtable(狐表)用户栏目专家坐堂 → 请教,代码提示设置了相同的键


  共有6736人关注过本帖平板打印复制链接

主题:请教,代码提示设置了相同的键

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


加好友 发短信
等级:婴狐 帖子:10 积分:127 威望:0 精华:0 注册:2016/5/22 21:18:00
请教,代码提示设置了相同的键  发帖心情 Post By:2016/11/12 12:53:00 [只看该作者]

该如何对这个资产负债表统计汇总呢?

Dim bd1 As New GroupTableBuilder("统计表1",DataTables("资产负债表"))
Dim dt1 As fxDataSource
bd1.Groups.AddDef("月份") '根据月份分组
bd1.Groups.AddDef("行次1") '根据行次1分组
bd1.Groups.AddDef("资产") '根据资产分组
bd1.Totals.AddDef("期初数","期初数3") '对期初数进行统计
bd1.Totals.AddDef("期末数","期末数3") '对期末数进行统计
dt1 = bd1.BuildDataSource()

Dim bd2 As New GroupTableBuilder("统计表2",DataTables("资产负债表"))
Dim dt2 As fxDataSource
bd2.Groups.AddDef("月份") '根据月份分组
bd2.Groups.AddDef("行次2") '根据行次2分组
bd2.Groups.AddDef("负债及所有者权益") '根据负债及所有者权益分组
bd2.Totals.AddDef("期初数1","期初数2") '对期初数1进行统计
bd2.Totals.AddDef("期末数1","期末数2") '对期末数1进行统计
dt2 = bd2.BuildDataSource()
Dim nms As String() = {"月份"} '指定连接列
dt1.Combine(nms,dt2,nms) '组合资产负债表到统计表1
dt1.Show("统计表1") '显示统计结果


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

 回到顶部
总数 12 1 2 下一页