Dim bd1 As New GroupTableBuilder("运费统计表", DataTables("运费明细表"))
Dim dt1 As fxDataSource
bd1.Groups.AddDef("驾驶员")
bd1.Totals.AddDef("金额(元)" , "总应支付金额")
bd1.Filter = "[是否支付] = False"
dt1 = bd1.BuildDataSource()
Dim bd2 As New GroupTableBuilder("扣款统计表", DataTables("款项扣除表"))
Dim dt2 As fxDataSource
bd2.Groups.AddDef("驾驶员")
bd2.Totals.AddDef("应扣款_金额", "扣除预支付")
bd2.Filter = "[应扣款_项目] = '预支付'"
dt2 = bd2.BuildDataSource()
Dim bd3 As New GroupTableBuilder("加油统计表", DataTables("加油表"))
Dim dt3 As fxDataSource
bd3.Groups.AddDef("驾驶员")
bd3.Totals.AddDef("金额", "扣除油款金额")
dt3 = bd3.BuildDataSource()
dt1.Combine("驾驶员",dt2,"驾驶员") '将销售统计数据组合到进货统计数据
dt1.Combine("驾驶员",dt3,"驾驶员") '将退货统计数据组合到进货统计数据
Tables("应付运费统计_Table1").DataSource = dt1 '将统计结果绑定到Table
With DataTables("应付运费统计_Table1").DataCols '用表达式列计算库存数据
.Add("应支付金额",Gettype(Double), "
[总应支付金额] - isnull([扣除预支付],0) - Isnull([扣除油款金额],0)")
End With
现在我写了一行代码绑定到了窗口中，但现在有个问题就是 后边的表有些数据，在总应支付中没有
我想要把[总应支付金额]为空值的行删掉。
应该怎么写？麻烦老师帮助一下，刚刚接触窗口
加好友 
发短信
Post By：2019/1/22 21:14:00 [只看该作者]
