- Foxtable(狐表) (http://foxtable.net/bbs/index.asp)
-- 专家坐堂 (http://foxtable.net/bbs/list.asp?boardid=2)
---- 请问:配置栏中第一个按键的图标如何取得?? (http://foxtable.net/bbs/dispbbs.asp?boardid=2&id=56389)
-- 发布时间：2014/9/4 11:43:00
-- 请问:配置栏中第一个按键的图标如何取得??
如题
-- 发布时间：2014/9/4 11:49:00
--
参考
For Each t As RibbonMenu.RibbonItem In ConfigBar.Items
If t.LargeImage IsNot Nothing Then
t.LargeImage.save("d:\\test.jpg")
Else If t.SmallImage IsNot Nothing Then
t.SmallImage.save("d:\\test.jpg")
Else
\'dddd
End If
Next
-- 发布时间：2014/9/4 14:44:00
--
3Q!! 解决了!!
我是要于配置栏上用一图标作为窗口的开关
If Forms("菜单窗口").OPENed Then
Forms("菜单窗口").close
e.Button.SmallImage = GetImage("展开D.gif") \'展开图标
e.Button.ToolTip = "click 打开菜单区"
Else
Forms("菜单窗口").open
e.Button.SmallImage = GetImage("收起U.gif")
e.Button.ToolTip = "click 关闭菜单区"
End If
此主题相关图片如下：收起u.gif
此主题相关图片如下：展开d.gif