Dim txt As String = e.Form.Controls("TextBox7").Text
Dim tbl As DataTable = DataTables("订单表")
If txt = "" Then
tbl.Filter = ""
Else
txt = "'%" & txt & "%'"
tbl.Filter = "客户尊称 Like " & txt & " Or 订单号 Like " & txt & " Or 订单名称 Like " & txt
End If
---------------------------
错误
---------------------------
编译错误:“Filter”不是“DataTable”的成员。
错误代码:tbl.Filter = ""
---------------------------
确定
---------------------------
[此贴子已经被作者于2016/3/20 17:13:42编辑过]