Dim b As New CrossTableBuilder("统计表3",DataTables("采购明细"))
b.HGroups.AddDef("供应商") '添加供应商列用于水平分组
b.VGroups.AddDef("账期","{0}月") '添加日期列用于垂直分组
b.Totals.AddDef("金额") '添加金额列用于统计
b.VerticalTotal= True
b.HorizontalTotal = True
b.Build '生成统计表
Tables("采购管理_Table6").DataSource = b.BuildDataSource()
以上是一个资金计划按钮的代码,想实现按月统计每个供应商的应付,已付,未付,想将下列代码加入,但不能实现,特求助
'b.Totals.AddExp("未付款","金额-付款")
'b.VGroups.AddDef("金额", "付款|未付款")
此主题相关图片如下:未命名.jpg