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

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

 

 

上述代码如何修改  可以解决 这个错误   并提示  您的关键字不对  重新尝试

谢谢  高手指教

 

 

此主题相关图片如下：qq截图20130402163331.jpg

是的  谢谢