主题：付款统计

以下是引用wilson在2012-10-1 15:53:00的发言：

我想实现以下功能，不知如何解决。

1.   我想增加统计 实收款列，在统计表1显示列名为实收金额列，而不是 已付款_实收金额 与 未付款_实收金额 。

2.   增加合计_数量： 合计_数量 = 已付款_数量 + 未付款_数量 

3.   增加合计_金额： 合计_金额 = 已付款_金额 + 未付款_金额

谢谢！

 

Dim g As New CrossTableBuilder("统计表1", DataTables("订单"))
g.HGroups.AddDef("客户名称")
g.Totals.AddDef("实收款", "实收金额")
g.VGroups.AddDef("已付款", "|未付款")
g.Totals.AddDef("数量", "数量")
g.Totals.AddDef("金额", "金额")
g.HorizontalTotal = True
g.VerticalTotal = True
g.Decimals = 0
g.Subtotal = True
g.FromServer = True 
g.Build()
MainTable = Tables("统计表1")

 

动态地隐藏列，都不能隐藏
With Tables("统计表1")
   .Cols("未付款_实收金额").Visible = False
   .Cols("合计_实收金额").Visible = False
End With