主题：[求助]

Dim t As Table = Tables("进货检周报表")
Dim g As Subtotalgroup
t.SubtotalGroups.Clear()
t.GroupAboveData = False
t.TreeVisible = False
t.SpillNode = True

 

g = New Subtotalgroup
g.Aggregate = AggregateEnum.Sum
g.GroupOn = "*"
g.TotalOn = "进货检故障数,进货检验总数,问题关闭耗时,问题解决人数,产生费用"
g.Caption = "总计"
t.SubtotalGroups.Add(g)

t.Subtotal()

 

Dim r As Row
For i As Integer = 0 To t.Rows.Count(True) - 1
    r = t.Rows(i,True)
    If r.IsGroup Then
        r("故障率") = r("进货检故障数") / r("进货检验总数")
    End If
Next

 

以上面的代码对表格中数据做出总计后，表中的数据就不能编辑了，有什么方法可以取消总计，然后继续编辑？

方法一：

 

doubleClick事件

 

e.Table.StartEditing

 

 

方法二：做一个按钮取消汇总模式

 

Syscmd.Table.ToggleSubtotalMode()

我在一个窗口做了3个表格，第二个方法如何分别取消统计？或者能不能将3个表一起取消统计？

Tables("表A").Filter = Tables("表A").Filter

Tables("表B").Filter = Tables("表B").Filter

万分感谢