以文本方式查看主题

-  Foxtable(狐表)  (http://foxtable.com/bbs/index.asp)
--  专家坐堂  (http://foxtable.com/bbs/list.asp?boardid=2)
----  自定义录入界面之三  (http://foxtable.com/bbs/dispbbs.asp?boardid=2&id=188616)

--  作者:1234567
--  发布时间:2023/10/6 13:37:00
--  自定义录入界面之三
图片点击可在新窗口打开查看能否根据订单ID和联系人内容,进行精确筛选?
--  作者:有点蓝
--  发布时间:2023/10/7 8:59:00
--  
改为使用【自定义录入界面之二】,在下拉窗口自己添加筛选条件,筛选条件合成类似:http://www.foxtable.com/webhelp/topics/1058.htm
--  作者:1234567
--  发布时间:2023/10/7 22:24:00
--  
自定义录入界面之二,我不想从文本框TextBox1取条件,希望在Table2中当前行的指定单元格中取值,下列代码怎么写?

Dim txt As String = Tables("窗口1_Table2").Row("雇员ID")
Dim tbl As Table = Tables("窗口1_Table1")
If txt = "" Then
    tbl.Filter = ""
Else
    txt = "\'%" & txt & "%\'"
    tbl.Filter = "客户ID Like " & txt & " Or 公司名称 Like " & txt & " Or 地址 Like " & txt & " Or 联系人 Like " & txt 
End If

--  作者:有点蓝
--  发布时间:2023/10/7 23:02:00
--  
如果这样,还不如用回自定义录入界面之三

Dim txt As String = Tables("窗口1_Table2").current("雇员ID")
Dim
 tbl As Table = Tables("窗口1_Table1")