主题：[求助]关于请教筛选加载的问题

有客户表，通过输入字符，进行快速模糊查询加载，但是如果输入的字符未找到，出现以下错误提示，请老师帮帮忙解决一下。

此主题相关图片如下：1.png

 

 

窗口：

 

此主题相关图片如下：2.png

 

 

查询控件代码：

 

Dim txt As String = e.Form.Controls("TextBox1").Text
Dim tbl As Table = Tables("客户")
If txt = "" Then
    tbl.DataTable.loadPage = 0
    tbl.DataTable.loadFilter = ""
    tbl.DataTable.load
Else
    txt = "'%" & txt & "%'"
    Dim Filter As String
    Filter = "客户编码 Like " & txt & " Or 客户名称 Like " & txt & " Or 注册登记类型 Like " & txt & " Or 法定代表人_姓名 Like " & txt & " Or 营业执照号 Like " & txt & " Or 国税登记号 Like " & txt & " Or 联系人 Like " & txt & " Or 客户名称首字母 Like " & txt
    If  Filter Is Nothing Then
        MessageBox.Show("无符号条件客户,请重新输入!","提示",MessageBoxButtons.OK,MessageBoxIcon.Information)
    Else
        tbl.DataTable.loadFilter = Filter
        tbl.DataTable.loadPage = 0
        tbl.DataTable.load
    End If
End If

 

我也知道是需要加一个条件判断，但是一直不对，不知哪里出错了？请老师帮一下，谢谢！