统计代码问题 - 专家坐堂 - Foxtable(狐表) - 新一代数据库软件，完美融合Access、Foxpro、Excel、vb.net之优势，人人都能掌握的快速软件开发工具!

学习的一个统计表，代码产生表金额和数量是分开的，怎样才能归类在一起，如协议订货：金额数量；新增订货：金额数量，等。请高手帮我修改代码。谢谢了！下面是代码：

Dim g As New CrossTableBuilder("统计表33", DataTables("新增订货"), "[新增合同] OR [当年协议转合同] OR [上年协议转合同] OR [新增协议] OR [上年协议]= TRUE")

g.Caption = "当年订货情况(外站)"

g.HGroups.AddDef("站名")

g.VGroups.AddDef("新增合同")

g.VGroups.AddDef("当年协议转合同")

g.VGroups.AddDef("上年协议转合同")

g.VGroups.AddDef("新增协议")

g.VGroups.AddDef("上年协议")

g.Totals.AddDef("不含税金额", "不含税金额(万元)")

g.Totals.AddDef("数量", "数量")

g.HorizontalTotal = True

g.VerticalTotal = True

g.Filter = "[新增合同] OR [当年协议转合同] OR [上年协议转合同] OR [新增协议] OR [上年协议]= TRUE"

g.Build()

Tables("统计表33").Cols("不含税金额_1").Caption="不含税金额(万元)_上年协议"

Tables("统计表33").Cols("数量_1").Caption="数量_上年协议"

Tables("统计表33").Cols("不含税金额_2").Caption="不含税金额(万元)_新增协议"

Tables("统计表33").Cols("数量_2").Caption="数量_新增协议"

Tables("统计表33").Cols("不含税金额_3").Caption="不含税金额(万元)_上年协议转合同"

Tables("统计表33").Cols("数量_3").Caption="数量_上年协议转合同"

Tables("统计表33").Cols("不含税金额_4").Caption="不含税金额(万元)_当年协议转合同"

Tables("统计表33").Cols("数量_4").Caption="数量_当年协议转合同"

Tables("统计表33").Cols("不含税金额_5").Caption="不含税金额(万元)_新增合同"

Tables("统计表33").Cols("数量_5").Caption="数量_新增合同"

Tables("统计表33").DataTable.BuildHeader

MainTable = Tables("统计表33")