以文本方式查看主题

-  Foxtable(狐表)  (http://foxtable.com/bbs/index.asp)
--  专家坐堂  (http://foxtable.com/bbs/list.asp?boardid=2)
----  多表多列删选  (http://foxtable.com/bbs/dispbbs.asp?boardid=2&id=124156)
--  作者：实话实说
--  发布时间：2018/8/31 15:03:00
--  多表多列删选
窗口1有1个文本框，名称为单号，我想用这个文本框对以下单号进行筛选：
送库单号，入库单号，发货单号，出库单号，前两个单号在入库表，后两个单号在出库表，用按钮操作：在文本框中人输入任1个单号都能筛选。按钮的代码是？
--  作者：有点甜
--  发布时间：2018/8/31 15:21:00
--  

textbox控件的textchanged事件

 

Dim txt As String = e.Sender.Text

Dim Filter As String = ""
If txt = ""
    filter = ""
Else
    txt = "\'%" & txt & "%\'"
    filter = "产品ID Like " & txt & " Or 缺省供应商 Like " & txt & "“
End If

Tables("表A").filter = filter
--  作者：实话实说
--  发布时间：2018/8/31 15:37:00
--  
是单号,比如出库单号CK001，另外是在入库表和出库表中筛选
--  作者：有点甜
--  发布时间：2018/8/31 15:46:00
--  
以下是引用实话实说在2018/8/31 15:37:00的发言：
是单号,比如出库单号CK001，另外是在入库表和出库表中筛选

 

1、放两个table控件，分别绑定入库表、出库表。

 

2、2楼的代码拷贝两份，分别筛选各自的表。