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
以上面的代码对表格中数据做出总计后,表中的数据就不能编辑了,有什么方法可以取消总计,然后继续编辑?