主题：关闭汇总模式

切换为汇总模式代码是:

Dim t As Table = Tables("表A")
Dim g As SubtotalGroup
t.SubtotalGroups.Clear()
t.GroupAboveData = False
t.TreeVisible = False
t.SpillNode = False

g = New SubtotalGroup
g.Aggregate = AggregateEnum.Sum
g.GroupOn = "*"
g.TotalOn = "第二列,第四列,第三列"
g.Caption = "总计"
t.SubtotalGroups.Add(g)

t.Subtotal()

要退出汇总模式,请问代码如何设置?