应该这样吧：：： Dim t As Table = Tables("库存捆包查询_Table1") 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()
加好友 
发短信
Post By：2010/3/22 13:07:00 [只看该作者]
