Dim t As Table = Tables("业务进程管理")
Dim g As Subtotalgroup
t.SubtotalGroups.Clear()
t.GroupAboveData = False
t.TreeVisible = True
t.SpillNode = True
g = New Subtotalgroup
g.Aggregate = AggregateEnum.Sum
g.GroupOn = "帐套号"
g.TotalOn = "本期利润"
g.TotalOn = "本期收入"
g.TotalOn = "增值税额"
g.TotalOn = "营业税额"
g.TotalOn = "代征附加税额"
g.TotalOn = "企业所得税"
g.TotalOn = "个人所得税"
g.Caption = "{0} 小计"
t.SubtotalGroups.Add(g)
t.Subtotal()
我用这段代码进行分类汇总,现在分类是可以的但是小计和总计行没有数字???