| 以文本方式查看主题 - Foxtable(狐表) (http://foxtable.net/bbs/index.asp) -- 专家坐堂 (http://foxtable.net/bbs/list.asp?boardid=2) ---- 为什么不能给菜单里的标签组件赋值？ (http://foxtable.net/bbs/dispbbs.asp?boardid=2&id=80816) |
| -- 作者：shilhoue -- 发布时间：2016/2/2 16:38:00 -- 为什么不能给菜单里的标签组件赋值？ Dim lb As RibbonMenu.Lablelb= RibbonTabs("导航").Groups("登录信息").Items("当前用户") lb.text="当前时间:" & Date.Today()
目的是在功能区中用标签显示当前的时间。
可是总是出错，不是说没有找到“导航”功能区就是说没有找到“登录信息”功能组，不知道怎么回事？ |
| -- 作者：大红袍 -- 发布时间：2016/2/2 16:42:00 -- 你切换成系统菜单了？只要切换到用户菜单才行。
同时，你的名称必须写对。 |
| -- 作者：shilhoue -- 发布时间：2016/2/2 17:03:00 -- 这样啊，我再试试 |
| -- 作者：shilhoue -- 发布时间：2016/2/2 17:11:00 -- 谢谢红袍老师，问题解决了。不过还有一个问题：在事件中怎么判断当前的菜单是系统菜单还是用户自定义菜单呢？ |
| -- 作者：大红袍 -- 发布时间：2016/2/2 17:16:00 -- 判断当前菜单
Foxtable提供了一个系统变量SystemMenu，此变量为逻辑型，如果当前菜单为系统菜单，则返回True，如果当前菜单为自定义菜单，则返回False。 |