此主题相关图片如下:错误原因.jpg
![dvubb 图片点击可在新窗口打开查看](UploadFile/2020-4/202042021531491262.jpg)
项目中增加数据统计功能,如下:
Case "班组结算"
Dim g As New CrossTableBuilder("出库统计", DataTables("出库"))
g.HGroups.AddDef("统计班组","班组")
g.VGroups.AddDef("统计日期", DateGroupEnum.Year, "{0}年")
g.VGroups.AddDef("统计日期", "{0}月")
g.Totals.AddDef("备件_属性", "备件属性")
g.Totals.AddDef("备件_总价", "总金额")
g.HorizontalTotal = True
g.VerticalTotal = True
g.Decimals = 2
g.Subtotal = True
g.Build()
MainTable = Tables("出库统计")
Tables("出库结算汇总_Table1").DataSource = g.BuildDataSource()