主题：[求助]

在textbox框中的textchanged事件中，想输入姓名的拼音码或身份证号等条件的任意字符去匹配，一运行代码提示“从字符串“[户号] Like '*0*'”到类型“Long”的转换无效。”

代码如下，

With e.Form
Dim txb1 As WinForm.TextBox = .Controls("textbox4")

      Tables("main_table1").filter = "[户号] Like '*" & txb1.text & "*'" Or "[姓名] Like '*" & txb1.text & "*'"
End With

请问如何编写