主题：原来好好地自定义录入界面突然出错了，怎么回事呢？

此主题相关图片如下：126.jpg

上个月 打得好好地，停了几天到这个月就突然出错了。

一定要说 有where 代码的话

只有这里了

Dim txt As String = e.Form.Controls("TextBox1").Text
Dim tbl As Table = Tables("窗口4_Table1")

Dim Filter As String

Dim Sort As String
If txt = "" Then
       Filter =" leveal=2 and deleted=0 and isstop=0"
       Sort = "pfullname desc,Standard desc,Unit1 desc"

Else
       txt = "'%" & txt & "%'"   '这里用%,不是*
      filter = "(pfullname Like " & txt & " Or Standard Like " & txt & " Or Unit1 Like " & txt & ") and (leveal=2 and deleted=0 and isstop=0)"
      Sort = "pfullname desc,Standard desc,Unit1 desc"
End If

tbl.DataTable.LoadFilter = Filter

tbl.DataTable.Load

tbl.sort = sort