主题：模糊查找报错

以下代码当输入字符不匹配时出错

Dim txt As String = e.Form.Controls("TextBox1").Text
Dim tbl As Table = Tables("客户主窗口_Table1")
If txt = "" Then
    tbl.Filter = ""
Else
    txt = "'%" & txt & "%'"
    tbl.Filter = "客户编号 Like " & txt & " Or 客户名称 Like " & txt & " Or 联系人 Like " & txt & " Or 地址 Like " & txt
End If

此主题相关图片如下：未标题-1.jpg

改成*号也是一样的结果

Currentchanged有如下代码

Dim dr As DataRow = e.Table.Current.DataRow
Dim wz As Integer = Tables("客户").FindRow(dr)
If wz >=0 Then
      Tables("客户").Position = wz
End If