以文本方式查看主题

-  Foxtable(狐表)  (http://foxtable.net/bbs/index.asp)
--  专家坐堂  (http://foxtable.net/bbs/list.asp?boardid=2)
----  [求助]关于列表框的问题(已解决)  (http://foxtable.net/bbs/dispbbs.asp?boardid=2&id=3171)

--  作者:sohper
--  发布时间:2009/6/17 9:02:00
--  [求助]关于列表框的问题(已解决)

在客户表有两个列表框,cmb1 cmb2  分别绑定到员工表的部门列和员工列.如何做到,cmb2的列表项目,只显示cmd1所属部门的员工呢?

[此贴子已经被作者于2009-6-17 14:13:55编辑过]

--  作者:狐狸爸爸
--  发布时间:2009/6/17 9:30:00
--  

在cmb2的Enter事件中加入代码:

Dim cmb1 As WinForm.ComboBox = Forms("窗口1").Controls("cmb1")
Dim
cmb2 As WinForm.ComboBox = Forms("窗口1").Controls("cmb2")
cmb2.ComboList =
DataTables("员工").GetComboListString("姓名","部门 = \'" & cmb1.value & "\'" )


--  作者:sohper
--  发布时间:2009/6/17 10:35:00
--  

不行哦,我的代码是,您帮我看看
Dim cmb1 As WinForm.ComboBox = e.Form.Controls("cmb1")
Dim cmb2 As WinForm.ComboBox = e.Form.Controls("cmb2")
cmb2.ComboList = DataTables("业务员表").GetComboListString("业务员","隶属部门 = \'" & cmb1.value & "\'" )


--  作者:sohper
--  发布时间:2009/6/17 10:36:00
--  

图片点击可在新窗口打开查看此主题相关图片如下:2.jpg
图片点击可在新窗口打开查看

--  作者:shxiaoya
--  发布时间:2009/6/17 10:39:00
--  
发文件才是硬道理
--  作者:狐狸爸爸
--  发布时间:2009/6/17 10:53:00
--  
你使用动态列表醒目,所以你不能在设计窗口的时候,还指定列表项目来源表,请全部删除关于列表项目的设置即可。
--  作者:sohper
--  发布时间:2009/6/17 14:14:00
--  
Ok了,原来有设置列表项目,没有清除!