主题：条件加载

以下模糊查询代码是否可以作为条件加载的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

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

此主题相关图片如下：1438.png

我的意思是

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

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

应该怎么设计？

再请教一下：

如果我只加载包含123456的行，

能否做到当我把123456全部输入，按确定键后才开始加载。

 

如果表A是父表，表B是子表，表C是孙表。

按上述方法条件加载表A。

表B是否可以参照说明之 父表与子表同步加载之一 方式加载

表C又将采用什么方式呢

继续提问

1）当SQLTable表数据更改后，主表数据并没有改变呀？

2）表A与表B建立关联,窗口中的表A的SQLTable表怎么和表B建立关联

窗口中的表B类型是否一定要做成SQLTable，还是可以做成Normal