以文本方式查看主题

-  Foxtable(狐表)  (http://www.foxtable.com/bbs/index.asp)
--  专家坐堂  (http://www.foxtable.com/bbs/list.asp?boardid=2)
----  [求助]关于窗口的问题  (http://www.foxtable.com/bbs/dispbbs.asp?boardid=2&id=130471)

--  作者:ls93005
--  发布时间:2019/1/22 21:14:00
--  [求助]关于窗口的问题
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


现在我写了一行代码绑定到了窗口中,但现在有个问题就是 后边的表有些数据,在总应支付中没有

我想要把[总应支付金额]为空值的行删掉。

应该怎么写?麻烦老师帮助一下,刚刚接触窗口


--  作者:有点蓝
--  发布时间:2019/1/22 21:36:00
--  
DataTables("应付运费统计_Table1").DeleteFor("总应支付金额=0 or 总应支付金额 is null")