以文本方式查看主题

-  Foxtable(狐表)  (http://foxtable.net/bbs/index.asp)
--  专家坐堂  (http://foxtable.net/bbs/list.asp?boardid=2)
----  [求助]菜单组合框如果链接选项或增加选项  (http://foxtable.net/bbs/dispbbs.asp?boardid=2&id=128077)
--  作者：joe_xgp
--  发布时间：2018/11/28 13:23:00
--  [求助]菜单组合框如果链接选项或增加选项
请问大侠们，在菜单设计时，添加了一个“部门”的组合框和一个“员工”的组合框，如何设置

（1）“部门”组合框的选项对应Datatables（“员工信息表”）中的部门列中的项目
（2）“员工”组合框的选项对应Datatables（“员工信息表”）中的员工列中的项目，但部门必须是“部门”组合框所对应的部门。

新手上路，请老师们指教，不胜感激！
--  作者：有点甜
--  发布时间：2018/11/28 14:50:00
--  

添加内容，参考


Dim zhk = RibbonTabs("功能区1").Groups("功能组1").Items("组合框1")
For Each s As String In DataTables("表a").GetValues("第一列")
    Dim b As New RibbonMenu.Button(s)
    b.Text = s \'按钮的标题也等于列名称
    zhk.Items.Add(b)
Next

 

不会做，请上传具体实例测试。
--  作者：joe_xgp
--  发布时间：2018/11/28 14:53:00
--  
非常感谢有点甜老师，菜鸟起步，感激不尽！！！