'定义一个GroupTableBuilder,名称为"统计表4",对出库表进行统计.
Dim ba As New GroupTableBuilder("统计表4",DataTables("出库"))
ba.Groups.AddDef("销售人员") '根据销售人员分组
ba.groups.AddDef("出库日期") '对日期进行分组
ba.Totals.AddDef("利润") '对利润进行统计
ba.Totals.AddDef("金额") '对金额进行统计
ba.Subtotal = True '生成汇总模式
ba.VerticalTotal = True '自动垂直汇总
ba.GrandProportion = True
Tables("采购管理_Table13").sort="金额"
Tables("采购管理_Table13").DataSource = ba.BuildDataSource()
目的：对统计结果排序，上述代码不含加粗行运行正常，含加粗行说未找到“金额”列“，金额列是表达式列，Tables("采购管理_Table13").sort="数量*单价"也不行，请指教
加好友 
发短信
Post By：2014/8/31 12:59:00 [只看该作者]
