Foxtable(狐表)用户栏目专家坐堂 → [求助]如何清除一个表中已经存在的汇总?


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

主题:[求助]如何清除一个表中已经存在的汇总?

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


加好友 发短信
等级:八尾狐 帖子:1960 积分:15536 威望:0 精华:0 注册:2011/7/16 20:59:00
[求助]如何清除一个表中已经存在的汇总?  发帖心情 Post By:2015/12/26 7:35:00 [只看该作者]


Dim t As Table = Tables(bm4)
Dim g As Subtotalgroup
t.SubtotalGroups.Clear()
'定义总计分组
g = New Subtotalgroup
g.Aggregate = AggregateEnum.Sum
g.GroupOn = "*" '注意总计分组用符号*表示.
......
之前使用上述方法建立了一个汇总。

数据更新了,表数据没有重新fill,而是直接改的表中数据,这时需要做汇总。采用上述方法原有的汇总无法清除掉。怎么解决呢?

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


加好友 发短信
等级:狐神 帖子:5015 积分:25363 威望:0 精华:0 注册:2015/8/18 9:21:00
  发帖心情 Post By:2015/12/26 10:03:00 [只看该作者]


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


加好友 发短信
等级:八尾狐 帖子:1960 积分:15536 威望:0 精华:0 注册:2011/7/16 20:59:00
  发帖心情 Post By:2015/12/26 12:03:00 [只看该作者]


Dim t As Table = Tables(bm4)
Dim g As Subtotalgroup
t.SubtotalGroups.Clear()
t.ClearSubtotal

'定义总计分组
g = New Subtotalgroup
g.Aggregate = AggregateEnum.Sum
g.GroupOn = "*" '注意总计分组用符号*表示.
g.TotalOn = "应收金额,已收金额,待收金额"
g.Caption = "总计"
t.SubtotalGroups.Add(g)
t.Subtotal() '生成汇总模式
Tables(bm4).AutoSizeCols

t.SubtotalGroups.Clear()
t.ClearSubtotal  用这两个哪个都不好用,无法把原来形成的汇总去掉,形成新的。原有的汇总不清除。




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


加好友 发短信
等级:狐神 帖子:5015 积分:25363 威望:0 精华:0 注册:2015/8/18 9:21:00
  发帖心情 Post By:2015/12/26 12:13:00 [只看该作者]

测试没有问题,上传例子说明


 回到顶部