主题：[求助]关于交叉统计！

请问如何将附件中的进销存数据统计成库存表的样式呢？

下载信息  [文件大小：   下载次数： ]

点击浏览该文件:管理项目1.foxdb

用下面的代码只能统计,但是实现不了入库减去出库！

 

Dim g As New CrossTableBuilder("统计表1", DataTables("进销存数据"))
g.HGroups.AddDef("物资编号")
g.VGroups.AddDef("出库", "出库|入库")
g.Totals.AddDef("数量", "数量")
g.HorizontalTotal = True
g.VerticalTotal = True
g.Build()
MainTable = Tables("统计表1")