以下模糊查询代码是否可以作为条件加载的Select语句

Dim txt As String = e.Form.Controls("TextBox1").Text
Dim tbl As Table = Tables("任务单")
If txt = "" Then
    tbl.Filter = ""
Else
    txt = "\'*" & txt & "*\'"
    tbl.Filter = "任务单编号 Like " & txt & " Or 工装模具编号 Like " & txt & " Or 产品名称 Like " & txt & " Or 产品图号 Like " & txt

 End If

帮助说明上是如下操作的

1、在设计窗口的时候，Table控件的类型根据需要设置为SQLTable或SQLQuery，并将Select语句设置为：

Select * From {订单} Where [_Identify] Is Null

这样默认不会加载任何订单，是一个空表。

2、在窗口的AfterLoad事件加上代码：

Dim y As Integer = Date.Today.Year
Dim m As Integer = Date.Today.Month
Dim dt1 As New Date(y, m, 1)
Dim dt2 As New Date(y, m, Date.DaysInMonth(y, m)) \'获取本月的最后一天
Dim Filter As String
Filter = "日期 >= #" & dt1 & "# And 日期 <= #" & dt2 & "#"
DataTables("窗口1_Table1").LoadFilter = Filter \'设置加载条件
DataTables("窗口1_Table1").Load() \'加载数据

这样打开窗口后，就会自动加载本月的订单。

1楼的加载条件应该怎么改，我一直弄不好。

斑竹，一打开项目，Tables("窗口1_Table1")就已经全部加载了，我错在那里了？帮我改改。

下载信息  [文件大小：   下载次数： ]

点击浏览该文件:管理项目1.zip

我输入关键字后，并没有加载所需数据，错那里了？

我的意思是

想把加载的条件设定如下：

在第一列或者第二列中，加载包含某几个字符的行，而这几个字符是根据需要动态输入的。

应该怎么设计？