以文本方式查看主题

-  Foxtable(狐表)  (http://foxtable.com/bbs/index.asp)
--  专家坐堂  (http://foxtable.com/bbs/list.asp?boardid=2)
----  [求助]如何取消总计分组?  (http://foxtable.com/bbs/dispbbs.asp?boardid=2&id=49861)
--  作者：新福星
--  发布时间：2014/4/25 6:12:00
--  [求助]如何取消总计分组?
Dim t As Table = Tables(bm4)
Dim g As Subtotalgroup
t.SubtotalGroups.Clear()
\'定义总计分组
g = New Subtotalgroup
g.Aggregate = AggregateEnum.Sum
g.GroupOn = "*" \'注意总计分组用符号*表示.
g.TotalOn = "数量,小计"
g.Caption = "总计"
t.SubtotalGroups.Add(g)
t.Subtotal() \'生成汇总模式
按上述码形成汇总之后,使用
Dim t As Table = Tables(bm4)
Dim g As Subtotalgroup
t.SubtotalGroups.Clear()
怎么取消不了汇总呢?谢谢
--  作者：Bin
--  发布时间：2014/4/25 8:49:00
--  
t.Filter=""