以文本方式查看主题 - Foxtable(狐表) (http://foxtable.net/bbs/index.asp) -- 专家坐堂 (http://foxtable.net/bbs/list.asp?boardid=2) ---- [求助]如何清除一个表中已经存在的汇总? (http://foxtable.net/bbs/dispbbs.asp?boardid=2&id=79199) |
-- 作者:新福星 -- 发布时间: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 -- 发布时间:2015/12/26 10:03:00 -- ClearSubtotal http://www.foxtable.com/help/topics/1372.htm
|
-- 作者:新福星 -- 发布时间: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 -- 发布时间:2015/12/26 12:13:00 -- 测试没有问题,上传例子说明 |