主题：当前页模糊查询设置

Dim txt As String = e.Form.Controls("TextBox1").Text
Dim tbl As Table = Tables("主表")
If txt = "" Then
    tbl.Filter = ""
Else
    txt = "'*" & txt & ""*'""
    tbl.Filter = "一级 Like " & txt & " Or 四级 Like " & txt & " Or 五级 Like " & txt & " Or 说明 Like " & txt & " Or 标签 Like " & txt  & txt
End If

应该是这个问题吧