以文本方式查看主题

-  Foxtable(狐表)  (http://foxtable.net/bbs/index.asp)
--  专家坐堂  (http://foxtable.net/bbs/list.asp?boardid=2)
----  [求助]怎么筛选窗口表内显示的数据?  (http://foxtable.net/bbs/dispbbs.asp?boardid=2&id=133279)

--  作者:zto001
--  发布时间:2019/4/11 10:38:00
--  [求助]怎么筛选窗口表内显示的数据?
[求助]怎么筛选窗口表内显示的数据?

Dim Filter As String
If RibbonTabs("跟单系统")("筛选")("标记状态").Pressed = True \' 如果按下(true)
If Filter > "" Then
    Filter = Filter & "标记 = True"
End If
Else
If Filter > "" Then
    Filter = Filter & "标记 = false"
End If
End If
        Tables("主页面_Table1").Filter = Filter


代码好像没写对

--  作者:zto001
--  发布时间:2019/4/11 10:39:00
--  
我只从当前显示行进行筛选。不是从数据库里面调取数据筛选
--  作者:有点甜
--  发布时间:2019/4/11 10:45:00
--  
Dim Filter As String = "1=1"
If RibbonTabs("跟单系统")("筛选")("标记状态").Pressed = True \' 如果按下(true)
    Filter = "标记 = True"
Else
    Filter = "标记 = false"
End If
Tables("主页面_Table1").Filter = Filter