以文本方式查看主题

-  Foxtable(狐表)  (http://foxtable.com/bbs/index.asp)
--  专家坐堂  (http://foxtable.com/bbs/list.asp?boardid=2)
----  筛选 filter 问题  (http://foxtable.com/bbs/dispbbs.asp?boardid=2&id=177875)

--  作者:edisontsui
--  发布时间:2022/6/8 10:12:00
--  筛选 filter 问题
If CurrentTable.name = "IL接头任务单" Then
        Tables("IL接头任务单").Filter = "[订单完成] = \'未打箱\' and [测试单] = \'正式单\'"
        For Each r As Row In Tables("IL接头任务单").rows
            DataTables("IL接头任务单").DataCols("要求交货日期").RaiseDataColChanged()
        Next
        Tables("IL接头任务单").Filter = "[已过期] = \'已过期\' and [测试单] = \'正式单\'"
End If

上面是一个按钮代码,执行起来比较慢。我本来是希望是执行第一次筛选之后,能够把筛选结果显示出来,然后再执行RaiseDataColChanged(),这样子的话,按道理执行起来是不会慢的。所以,我怀疑第一次筛选的动作没有执行,因为数据表的画面也没有显示第一次筛选的结果。请问是这样理解吗?

--  作者:有点蓝
--  发布时间:2022/6/8 10:27:00
--  
2句代码即可
DataTables("IL接头任务单").DataCols("要求交货日期").RaiseDataColChanged("[订单完成] = \'未打箱\' and [测试单] = \'正式单\'")
Tables("IL接头任务单").Filter = "[已过期] = \'已过期\' and [测试单] = \'正式单\'"

--  作者:edisontsui
--  发布时间:2022/6/8 10:40:00
--  
谢谢。