以文本方式查看主题

-  Foxtable(狐表)  (http://foxtable.net/bbs/index.asp)
--  专家坐堂  (http://foxtable.net/bbs/list.asp?boardid=2)
----  [求助]双语系统中改变菜单语种的问题。  (http://foxtable.net/bbs/dispbbs.asp?boardid=2&id=44830)

--  作者:夜雨寒风
--  发布时间:2014/1/9 19:32:00
--  [求助]双语系统中改变菜单语种的问题。
本人在做一双语系统,用快速访问栏定义传统菜单式样,菜单文本默认为中文,用户分Chinese和English角色,当English角色登录时,要求启动后,看到的是英文菜单。该如何写代码?代码放在何处?求专家解答!
--  作者:有点甜
--  发布时间:2014/1/9 19:45:00
--  
 用类似下面的代码,你得先把表设计好,然后去表里查找对应的数据替换abcdefg

For Each ctl As object In QAT.Items
    ctl.text = "abcdefg"
Next

--  作者:夜雨寒风
--  发布时间:2014/1/9 21:15:00
--  
谢谢楼上,成功了。在项目的AfterOpenProject事件中编写如下代码:

Dim ctl as Object = QAT.Items

ctl("Menu1").Text = "English1"
ctl("Menu2").Text = "English2"