主题：[求助]关于表数据筛选的问题。

合成条件

Dim s As String = 0
Dim t As Table = Tables("表A")
If s = "1" Then
    t.filter = "第二列 = '" & s & "'"
Else
    Dim s1 As String = t.DataTable.GetComboListString("第一列", "第二列='1'")
    s1 = s1.replace("|", "','")
    t.filter = "第二列 = '" & s & "' and 第一列 not in ('" & s1 & "')"   
End If