以文本方式查看主题

-  Foxtable(狐表)  (http://foxtable.com/bbs/index.asp)
--  专家坐堂  (http://foxtable.com/bbs/list.asp?boardid=2)
----  [求助]动态列表项目  (http://foxtable.com/bbs/dispbbs.asp?boardid=2&id=61150)
--  作者：风声
--  发布时间：2014/12/8 9:19:00
--  [求助]动态列表项目
老师，我要实现这样的条件。谢谢 当表a单元格数据是销售这时表B绑定的窗口列表框的内容出现的是上海 当表a单元格数据是内调这时表B绑定的窗口列表框的内容出现的是一分厂 当表a单元格数据是外借这时表B绑定的窗口列表框的内容出现的是分公司
--  作者：有点甜
--  发布时间：2014/12/8 9:21:00
--  

 参考，设置好表B

 

 

[此贴子已经被作者于2014-12-8 9:21:38编辑过]
--  作者：有点甜
--  发布时间：2014/12/8 9:22:00
--  

http://www.foxtable.com/help/topics/1523.htm

 
--  作者：风声
--  发布时间：2014/12/8 10:10:00
--  

有操作窗口

 下载信息  [文件大小：   下载次数： ]
图片点击可在新窗口打开查看点击浏览该文件:管理项目5.rar
--  作者：有点甜
--  发布时间：2014/12/8 10:14:00
--  

afterload事件加入代码

 

e.Form.Controls("ComboBox1").Combolist = DataTables("项目").GetComboListString("方向", "销售管理 = \'" & Tables("表A").Current("销售管理") & "\'")
--  作者：风声
--  发布时间：2014/12/8 11:34:00
--  
老师，上面代码在选择对应的字段时要关闭窗口后重新打开才能对上号
--  作者：有点甜
--  发布时间：2014/12/8 11:39:00
--  

 在表A的CurrentChanged事件也写上

 

If Forms("窗口1").Opened Then
    Forms("窗口1").Controls("ComboBox1").Combolist = DataTables("项目").GetComboListString("方向", "销售管理 = \'" & Tables("表A").Current("销售管理") & "\'")
End If

 
--  作者：有点甜
--  发布时间：2014/12/8 11:39:00
--  

 或者，在控件的Enter事件，写上代码

 

e.Form.Controls("ComboBox1").Combolist = DataTables("项目").GetComboListString("方向", "销售管理 = \'" & Tables("表A").Current("销售管理") & "\'")