主题：[求助]Filter不起作用，请指点！

各位大师，请帮忙看看是怎么回事？

如下图：

此主题相关图片如下：filter.jpg

照理说，审核标志=True才能显示在这，但是没有审核的也出现了。不知道是怎么回事？

下面是代码：

输入字符查询文本框的代码：

TextChanged：

Dim txt As String = e.Form.Controls("TextBox1").Text
Dim tbl As Table = Tables("选择物料_Table1")
'Dim supplierid As String
If e.Form.Controls("wu").Checked = True Then ' “无所谓”Checkbox选上后的代码 , 数据来自 物料编码表
    If txt = "" Then
        tbl.Filter = ""
    Else
        txt = "'*" & txt & "*'"
        tbl.Filter = " 物料编号 Like " & txt & " Or 原厂编号 Like " & txt & " Or 重要参数 Like " & txt & " And 审核标志 = True"   ‘主要是And 审核标志 = True这个条件似乎不起作用
    End If
End If

If e.Form.Controls("stock").Checked = True Then ' “有库存”Checkbox选上后的代码 , 数据来自 剩余库存表
    If txt = "" Then
        tbl.Filter = ""
    Else
        txt = "'*" & txt & "*'"
        tbl.Filter = " 物料描述 Like " & txt & " And 剩余库存 > 0 "
    End If
End If