以文本方式查看主题 - Foxtable(狐表) (http://foxtable.com/bbs/index.asp) -- 专家坐堂 (http://foxtable.com/bbs/list.asp?boardid=2) ---- [求助] 菜单项目标题的问题 (http://foxtable.com/bbs/dispbbs.asp?boardid=2&id=123344) |
-- 作者:mikee -- 发布时间:2018/8/12 20:55:00 -- [求助] 菜单项目标题的问题 请教如下代码,根据菜单项的标题判断,为何总是执行Else的代码,即使标题IF后面的条件为真? Dim btn As RibbonMenu.Button btn = RibbonTabs("Table").Groups("Column").Items("AddColumn") Messagebox.show(btn.text) \'这里显示的菜单标题为“增加列” If btn.Text = "增加列" Then Messagebox.show("增加列") Else Messagebox.show("删除列") End If |
-- 作者:有点甜 -- 发布时间:2018/8/12 23:07:00 -- Dim btn = RibbonTabs("Table").Groups("Column").Items("AddColumn") If btn.Text.trim = "增加列" Then |