[求助]关于组合统计内添加筛选条件的问题，我做了个库存组合统计窗口用于对库存进行查询，并设置了一个筛选条件"截止日期“，希望输入某一天的日期后可以查询截止到那一天的库存情况，下面的代码已经能实现：Dim d1 As Date = Forms("外购原料库存查询").Controls("EndDate").Value
Dim bd1 As New GroupTableBuilder("生产原料库存查询",DataTables("原料出入库"))
Dim dt1 As fxDataSource
bd1.FromServer = True
bd1.Filter = "操作日期 <= '" & d1 & "' "
bd1.Groups.AddDef("原料批次") '根据型号分组
bd1.Totals.AddDef("预入含税单价","预入含税单价") '对金额进行统计
bd1.Totals.AddDef("入库件数","入库_件数") '对金额进行统计
bd1.Totals.AddDef("fa piao标重","入库_标重") '对数量进行统计
dt1 = bd1.BuildDataSource()
Dim bd2 As New GroupTableBuilder("统计表2",DataTables("外购原料出库"))
Dim dt2 As fxDataSource
bd2.FromServer = True
bd2.Filter = "操作日期 <= '" & d1 & "' "
bd2.Groups.AddDef("原料货号") '根据型号分组
bd2.Totals.AddDef("出库件数","出库_件数") '对金额进行统计
bd2.Totals.AddDef("出库标重","出库_标重") '对数量进行统计
dt2 = bd2.BuildDataSource()
dt1.Combine("原料批次",dt2,"原料货号") '将销售统计数据组合到进货统计数据
dt1.Show("生产原料库存查询")
现在的问题是如果窗口控件“截止日期”为空的话，不能查询，哪位老师帮忙看看，应该怎么改代码，谢谢
加好友 
发短信
Post By：2018/5/15 8:28:00 [显示全部帖子]
