以文本方式查看主题

-  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=133179)

--  作者:lfz123
--  发布时间:2019/4/9 9:57:00
--  筛选不变动
请教:我加了黄色背景的代码,结果出不来,显示结果还是绿色代码的结果,请问如何改写代码?
Dim t As Table = Tables("应收款清理_table1")
t.OpenView("简易视图")
Dim r As Row = Tables("银行流水").Current
t.DataTable.ReplaceFor("辅助勾选", False)
t.DataTable.replacefor("辅助勾选", True, "消帐码 is not null")
t.Filter = "收款户名 = \'"& r("户名") & "\' and  消帐码 is null or 辅助勾选 = false"
t.Sort = "方式,发生时间"

--  作者:有点甜
--  发布时间:2019/4/9 11:13:00
--  

 

t.Filter = "收款户名 = \'"& r("户名") & "\' and (消帐码 is null or 辅助勾选 = false)"