- Foxtable(狐表) (http://foxtable.com/bbs/index.asp)
-- 专家坐堂 (http://foxtable.com/bbs/list.asp?boardid=2)
---- [求助]ComboBox控件的选择 (http://foxtable.com/bbs/dispbbs.asp?boardid=2&id=111509)
-- 发布时间：2017/12/23 11:49:00
-- [求助]ComboBox控件的选择
ComboBox控件
Dim cmb As WinForm.ComboBox = e.form.Controls("ComboBox1")
cmb.ComboList = DataTables("采购清单").GetComboListString("采购订单号")
以上代码是对采购清单表里的采购订单号进行下拉选择
比如01 02 03
如果有一个
TextBox控件
Dim txt As String = e.Form.Controls("供应商").Text
txt = "\'%" & txt & "%\'"
tbl.Filter ="供应商 Like " & txt
筛选后采购订单号只剩下02 03
想要在ComboBox控件里只下拉选择 TextBox控件中Filter后的内容（02 03），需要怎么改动
-- 发布时间：2017/12/23 11:56:00
--
Dim cmb As WinForm.ComboBox = e.form.Controls("ComboBox1")
cmb.ComboList = DataTables("采购清单").GetComboListString("采购订单号",IIF(Tables("采购清单").Filter > "",Tables("采购清单").Filter,""))
-- 发布时间：2017/12/23 12:39:00
--
并没有起效啊老师
对于采购订单表有三行，采购订单号分别为01 02 03
希望首先在TextBox控件里输入供应商信息，采购清单里进行一次筛选，这时采购订单号只剩下02 03
再用ComboBox控件进行第二次筛选，下拉选择里只显示02 03 ，屏蔽掉01 |
[此贴子已经被作者于2017/12/23 14:16:56编辑过]
-- 发布时间：2017/12/23 14:25:00
--
代码写到ComboBox控件enter事件
e.sender.ComboList = DataTables("采购清单").GetComboListString("采购订单号",IIF(Tables("采购清单").Filter > "",Tables("采购清单").Filter,""))
-- 发布时间：2017/12/23 14:34:00
--
老师无效，录了个GIF 帮忙看一下，是否是因为窗口AFTERLOAD事件也有筛选条件，需要怎么修改呢？
此主题相关图片如下：录像9_转.gif
-- 发布时间：2017/12/23 14:44:00
--
窗口表是副本？http://www.foxtable.com/webhelp/scr/1906.htm
-- 发布时间：2017/12/23 14:46:00
--
是的，忘了描述这个，不能用副本表吗
-- 发布时间：2017/12/23 14:50:00
--
有没有认真看帮助呀
e.sender.ComboList = DataTables("采购清单").GetComboListString("采购订单号",IIF(Tables("窗口1_Table1").Filter> "",Tables("窗口1_Table1").Filter,""))
-- 发布时间：2017/12/23 14:58:00
--
谢谢