主题：[求助]关于模糊筛选

求助大侠：

关于模糊查寻：

有内容为： “ 89米（M/6）— 电脑 ”

现我想模糊输入： “ 89M ” 就能将上面这个输出

不知道如何修改如下代码的？

Dim tnames() As String = { "Table1", "Table2"}
With e.Form
If e.sender.text <> ""Then
For Each tname As String In tnames
Dim dst As Table = Tables(tname)
Dim txb1 As WinForm.TextBox = .Controls("TextBox1")
Dim filter As String = "1=2"
For Each dc As DataCol In dst.DataTable.DataCols
filter &= " or convert(" & dc.Name & ",'System.String') like '%" & txb1.text & "%'"
Next

dst.Filter = filter
Next
End If
End With

老大你帮忙给的代码不能执行呢？