以文本方式查看主题

-  Foxtable(狐表)  (http://foxtable.net/bbs/index.asp)
--  专家坐堂  (http://foxtable.net/bbs/list.asp?boardid=2)
----  窗口查询代码问题  (http://foxtable.net/bbs/dispbbs.asp?boardid=2&id=93609)

--  作者:feixianzhi
--  发布时间:2016/12/2 10:42:00
--  窗口查询代码问题
    我做了一个窗口,用于查询一个外部数据表中某列的内容。代码如下:


Dim txt As String = e.Form.Controls("spmc").Text
Dim tbl As Table = Tables("综合查询_Table1")
If txt = "" Then
    tbl.Filter = ""
 Else
    txt = "\'%" & txt & "%\'"
    tbl.Filter = "药品名称 Like " & txt
End If

因为是外部数据表,现在只能查询已经加载的内容。
我想实现:不加载的内容也能通过窗口查询到。
代码怎么改,请各位老师帮忙。

--  作者:有点蓝
--  发布时间:2016/12/2 11:09:00
--  
Dim txt As String = e.Form.Controls("spmc").Text
Dim tbl As Table = Tables("综合查询_Table1")
If txt = "" Then
    tbl.Filter = ""
 Else
    txt = "\'%" & txt & "%\'"
    tbl.DataTable.LoadFilter = "药品名称 Like " & txt
    tbl.DataTable.load
End If