Foxtable(狐表)用户栏目专家坐堂 → 组合统计没有数据?


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

主题:组合统计没有数据?

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


加好友 发短信
等级:狐神 帖子:6827 积分:43183 威望:0 精华:0 注册:2009/3/2 14:07:00
  发帖心情 Post By:2011/11/4 7:51:00 [只看该作者]

Dim nms As String() = {"品名","型号"} '指定连接列
这个代码的用法,在帮助怎么找不到呢?

这个代码如何用动态的方法合成?


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


加好友 发短信
等级:狐神 帖子:6827 积分:43183 威望:0 精华:0 注册:2009/3/2 14:07:00
  发帖心情 Post By:2011/11/4 7:52:00 [只看该作者]

Dim bd1 As New GroupTableBuilder("统计表1",DataTables("进货单"))
Dim dt1 As fxDataSource
bd1.Groups.AddDef("品名") '根据品名分组
bd1.Groups.AddDef("型号") '根据型号分组
bd1.Totals.AddDef("数量","进货_数量") '对数量进行统计
bd1.Totals.AddDef("金额","进货_金额") '对金额进行统计
dt1 = bd1.BuildDataSource() 

Dim bd2 As New GroupTableBuilder("统计表2",DataTables("销售单"))
Dim dt2 As fxDataSource
bd2.Groups.AddDef("品名") '根据品名分组
bd2.Groups.AddDef("型号") '根据型号分组
bd2.Totals.AddDef("数量","销售_数量") '对数量进行统计
bd2.Totals.AddDef("金额","销售_金额") '对金额进行统计
dt2 = bd2.BuildDataSource()

Dim bd3 As New GroupTableBuilder("统计表3",DataTables("退货单"))
Dim dt3 As fxDataSource
bd3.Groups.AddDef("品名") '根据品名分组
bd3.Groups.AddDef("型号") '根据型号分组
bd3.Totals.AddDef("数量","退货_数量") '对数量进行统计
bd3.Totals.AddDef("金额","退货_金额") '对金额进行统计
dt3 = bd3.BuildDataSource()

Dim nms As string() = {"品名","型号"} '指定连接列
dt1.Combine(nms,dt2,nms) '将销售统计数据组合到进货统计数据
dt1.Combine(nms,dt3,nms) '将退货统计数据组合到进货统计数据
Tables("窗口1_Table1").DataSource = dt1 '将统计结果绑定到Table

 

 

Dim nms As string() = {"品名","型号"} 就是这行代码如何动态合成

[此贴子已经被作者于2011-11-4 7:54:02编辑过]

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


加好友 发短信
等级:狐神 帖子:6827 积分:43183 威望:0 精华:0 注册:2009/3/2 14:07:00
  发帖心情 Post By:2011/11/4 11:09:00 [只看该作者]

Dim nms As string() = {"品名","型号"} 就是这行代码如何动态合成

 

再次求助!


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


加好友 发短信
等级:管理员 帖子:47448 积分:251048 威望:0 精华:91 注册:2008/6/17 17:14:00
  发帖心情 Post By:2011/11/4 12:11:00 [只看该作者]

Dim nms(1) as string
nms(0) = "列1"
nms(1) = "列2"

 回到顶部
总数 14 上一页 1 2