Dim txt As String = e.form.Controls("TextBox10").text
Dim tbl As DataTable = DataTables("Person_info")
If txt = "" Then
'tbl.Filter = ""
Else
tbl.loadFilter = "[name] like '" & txt & "' "
tbl.load()
End If
以上只能完全匹配加载,怎么该模糊匹配?
以下能模糊筛选:
Dim tbl As Table = Tables("Person_info")
If txt = "" Then
'tbl.Filter = ""
Else
txt = "'*" & txt & "*'"
tbl.Filter = "name Like " & txt & " Or papernum Like " & txt & " Or phone Like " & txt & " Or bmunit Like " & txt
End If