AO 开发之 如何创建定制的菜单(Menu) zz# GeoSpace - 地球与空间科学
d*e
1 楼
l 要点
用户通过在类模块中实现IMenuDef接口来创建定制的菜单(Menu),如果要使菜单出现在
Customize Dialog的Menus类型中，必须同时实现IrootLevelMenu接口，它表明菜单为
root menu。IMenuDef接口包括 Caption、ItemCount及Name三个属性和GetItemInfo方法
。类似IToolBarDef(参照1.2.3)
l 程序说明
程序在类模块中实现IMenuDef接口来创建定制的菜单(Menu)。
l 代码
Option Explicit
'Implement the IMenuDef interface and IRootLevelMenu interface
Implements IMenuDef
Implements IRootLevelMenu
Private Property Get IMenuDef_Caption() As String
' Set the string that appears as the menu's title
IMenuDef_Caption = "MyM
用户通过在类模块中实现IMenuDef接口来创建定制的菜单(Menu),如果要使菜单出现在
Customize Dialog的Menus类型中，必须同时实现IrootLevelMenu接口，它表明菜单为
root menu。IMenuDef接口包括 Caption、ItemCount及Name三个属性和GetItemInfo方法
。类似IToolBarDef(参照1.2.3)
l 程序说明
程序在类模块中实现IMenuDef接口来创建定制的菜单(Menu)。
l 代码
Option Explicit
'Implement the IMenuDef interface and IRootLevelMenu interface
Implements IMenuDef
Implements IRootLevelMenu
Private Property Get IMenuDef_Caption() As String
' Set the string that appears as the menu's title
IMenuDef_Caption = "MyM