此主题相关图片如下：广西1.jpg
其中，DropDownOpened的原代码如下：
------------------------------------
Dim txt As String = e.Form.DropDownBox.Text
Dim tbl As Table = Tables("输入注册证号弹出筛选窗口_Table1")
If txt = "" Then
tbl.Filter = "停用=false"
Else
txt = "'%" & txt & "%'"
tbl.Filter = "停用=false and (名称 Like " & txt & " Or 注册证号 Like " & txt & " Or 生产企业 Like " & txt & ")"
End If
e.Form.DropDownBox.Select() '将输入焦点返回下拉列表框
-----------------------------------------------
按照我图片的期望，是不是理解成加多后面红色字体的代码段上去，但如何加呢？望老师解答。【 tbl.Filter = "停用=false and A（配送公司）=B（配送公司） and (名称 Like " & txt & " Or 注册证号 Like " & txt & " Or 生产企业 Like " & txt & ")"】
加好友 
发短信
Post By：2018/5/29 8:42:00 [只看该作者]
