以文本方式查看主题

-  Foxtable(狐表)  (http://www.foxtable.com/bbs/index.asp)
--  专家坐堂  (http://www.foxtable.com/bbs/list.asp?boardid=2)
----  关于中英文系统问题请教  (http://www.foxtable.com/bbs/dispbbs.asp?boardid=2&id=50023)

--  作者:atmetmicoo
--  发布时间:2014/4/28 10:16:00
--  关于中英文系统问题请教
各位老师好,

我从论坛上找到了如何做中英文版系统,现在就差菜单不知道怎么写代码,烦请各位老师赐教:


快捷菜单、配置栏、功能区菜单这三样如何写 For Each 代码,谢谢!

--  作者:Bin
--  发布时间:2014/4/28 10:16:00
--  
http://www.foxtable.com/bbs/dispbbs.asp?BoardID=2&ID=17549&skin=0
--  作者:Bin
--  发布时间:2014/4/28 10:21:00
--  
For Each rt As Foxtable.RibbonMenu.Tab In RibbonTabs 
   output.show(rt.name)
   For Each g As object In rt.groups
      output.show(g.name)
      For Each item As object In g.Items
          output.show(item.name)
      Next
   Next
Next

--  作者:atmetmicoo
--  发布时间:2014/4/28 10:44:00
--  
Hi,Bin,如果是配置栏,怎么写,谢谢

Dim itm As ???
For Each itm In ConfigBar.Items
???
Next

[此贴子已经被作者于2014-4-28 10:44:16编辑过]

--  作者:有点甜
--  发布时间:2014/4/28 10:47:00
--  

For Each item As object In ConfigBar.Items

 
Next

--  作者:atmetmicoo
--  发布时间:2014/4/28 10:56:00
--  
以下是引用有点甜在2014-4-28 10:47:00的发言:

For Each item As object In ConfigBar.Items

 
Next

这个代码只能显示配置栏一级菜单的信息,如果是配置栏下一个集合的信息,该怎么写,请甜老师指教!


--  作者:Bin
--  发布时间:2014/4/28 10:59:00
--  
http://www.foxtable.com/bbs/dispbbs.asp?BoardID=2&ID=42303&skin=0
--  作者:有点甜
--  发布时间:2014/4/28 11:29:00
--  

 把这个帖子看完

 

http://www.foxtable.com/bbs/dispbbs.asp?BoardID=2&ID=49604&skin=0

 


--  作者:atmetmicoo
--  发布时间:2014/4/28 13:34:00
--  
谢谢填老师提供的帮助,配置栏已解决

快捷菜单还不知道怎么处理,还需要您的帮助

--  作者:Bin
--  发布时间:2014/4/28 14:06:00
--  
看8楼.