Foxtable(狐表)用户栏目专家坐堂 → 关于GroupTableBuilder的问题


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

主题:关于GroupTableBuilder的问题

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


加好友 发短信
等级:六尾狐 帖子:1470 积分:11456 威望:0 精华:0 注册:2013/11/24 22:10:00
关于GroupTableBuilder的问题  发帖心情 Post By:2021/7/29 21:24:00 [只看该作者]

老师

     我今天在做分组统计时,发现在一个很有趣的问题。代码如下:

Dim b As New GroupTableBuilder("统计表1",tbl)
b.Groups.AddDef("fa piao号码") '添加客户列用于分组
b.Groups.AddDef("税率") '添加产品列用于分组
b.Groups.AddDef("开piao名称") '添加产品列用于分组
b.Groups.AddDef("规格型号") '添加产品列用于分组
b.Groups.AddDef("开piao价格") '添加产品列用于分组
b.Groups.AddDef("物料编码") '添加产品列用于分组
b.Totals.AddDef("开piao数量") '添加数量列用于统计
'b.Totals.AddDef("开piao金额") '添加金额列用于统计
Tables(e.Form.name & "_tjxmxb").DataSource = b.Build() '生成统计表
Tables(e.Form.name & "_tjxmxb").DataTable.DataCols.Add("开piao金额", Gettype(Double))
For Each r As DataRow In Tables(e.Form.name & "_tjxmxb").DataTable.dataRows
    r("开piao金额") = Round2(r("开piao数量")*r("开piao价格"),2)
Next

这段代码运行是没有问题的。但是如果我不想显示这个表,把build的显示参数设成True.  Tables(e.Form.name & "_tjxmxb").DataSource = b.Build(True) 就会报错,说不存在开piao金额的列。
我用output 把Tables(e.Form.name & "_tjxmxb")列全部弄出来,明明又有这个列。为什么会这样?

[此贴子已经被作者于2021/7/29 21:24:30编辑过]

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


加好友 发短信
等级:超级版主 帖子:110544 积分:562604 威望:0 精华:9 注册:2015/6/24 9:21:00
  发帖心情 Post By:2021/7/29 21:41:00 [只看该作者]

Tables(e.Form.name & "_tjxmxb").DataSource = b.BuildDataSource()
[此贴子已经被作者于2021/7/29 21:41:22编辑过]

 回到顶部