主题：[原创]凭证的汇总显示

如果用汇总模式，那么是不可以的。

可以增加一个汇总按钮，代码为：

 

With Tables("表名")

     Dim r As  Row = .Addnew()

     r("某列") = "合计"

     r("金额") = .Compute("Sum(金额)")

End With

再做一个清除合计的行，直接找出某列内容和"合计"的行，删除之。