此主题相关图片如下：xxx.jpg

我被老板要求做到如下要求：打开该窗口后，下面的表中就有总计，统计出收款金额。如果单击“新增”后，总计 这一行自动刷新数据（而且总计默认一直在最后行）。同时不能影响删除这些按钮的正常功能。。。。

首先，我觉得很奇怪，因为我从来没用这么去设计过，一直以来我都是通过EXCEL报表，来实现 总计 的。

其次，我试过一个方法，但是新增记录后，不能录入数据。代码如下：

\'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()