我再追问一下吧
我窗体中的“统计”按钮里的代码我写好了 但没有用到菜单里年月份的值来做筛选,能帮我稍稍改一下吗?
主要是加个筛选条件,注释请无视,我复制帮助里的
以下是源代码:
----------------------------------------------------------------------------------------
Dim bd1 As New GroupTableBuilder("统计表1",DataTables("每月订单"))
Dim dt1 As fxDataSource
bd1.Groups.AddDef("车型") '根据型号分组
bd1.Totals.AddDef("数量","计划") '对数量进行统计
dt1 = bd1.BuildDataSource()
Dim bd2 As New GroupTableBuilder("统计表2",DataTables("每日产量"))
Dim dt2 As fxDataSource
bd2.Groups.AddDef("车型") '根据型号分组
bd2.Totals.AddDef("数量","完成") '对数量进行统计
dt2 = bd2.BuildDataSource()
dt1.Combine("车型",dt2,"车型") '将销售统计数据组合到进货统计数据
Tables("产量统计_Table1").DataSource = dt1 '将统计结果绑定到Table
With DataTables("产量统计_Table1").DataCols '用表达式列计算库存数据
.Add("未完成",Gettype(Integer), "IsNull([计划],0) - ISNULL([完成],0)")
End With
--------------------------------------------------------------------------------------
[此贴子已经被作者于2012-8-20 14:11:18编辑过]