主题：[求助]能够判断筛选树是否开启吗

如题

For Each a As OBJECT In Tables("表A").grid.Parent.controls
    For Each b As OBJECT In a.controls
        For Each c As OBJECT In b.controls          
            msgbox(c.text)
            If c.text = "筛选树" Then
                msgbox(2)
            End If
        Next
    Next
Next

多谢。另外还有个问题。

 

在beforeFilter那里处理一下

 

http://www.foxtable.com/webhelp/scr/2059.htm

 

参考代码

 

Dim s = "第一列='111'333' and 第二列='a'bc' "
Dim mc = System.Text.RegularExpressions.Regex.Matches(s, "(?<=[= ]').*?(?=' )")
For i As Integer = 0 To mc.count-1
    msgbox(mc(i).value)
    s = s.replace(mc(i).value, mc(i).value.replace("'", "''"))
Next
msgbox(s)

那如何获取系统自带的筛选树的节点的名字呢。。

 

不明白你的意思。如果是筛选问题，你编写beforeFilter事件不行？参考4楼代码。

我这个问题时由于点了筛选树的一个节点上的名字包含了  ‘  符号。