项目集合
RibbonTabs是个集合,包括菜单的所有功能区。
功能区(Tab)的Groups属性是个集合,包括此功能区的所有功能组。
功能组(Group)、工具栏(ToolBar)、配置栏(ConfigBar)、组合按钮(SplitButton)、菜单按钮(MenuButton)、组合框(ComboBox)等都是容器,它们都有Items属性,此属性返回一个集合,包括此容器中的所有菜单组件。
程序菜单(ApplicationMenu)也是个容器,不过它有三个集合,用三个属性返回,分别是LeftItems(左侧菜单组件集合)、RightItems(右侧菜单组件集合)、BottomItems(底部菜单组件集合)。
利用项目集合,不仅可以获得指定名称的菜单组件,我们还可以向其中增加、插入和删除菜单组件。
项目集合的方法:
方法 | 说明 |
Contains | 判断是否包括指定名称的组件。 语法: Contains(Name) Name: 组件名称 |
Clear | 清除所有组件 |
Add | 增加一个组件,语法: Add(Item) Item: 要增加的项目 |
Insert | 在指定位置插入一个组件。 语法: Insert(Index, Item) Index: 整数型,插入位置 Item: 要插入的组件。 |
Remove | 删除指定的组件,或者删除指定名称的组件。 语法: Remove(Name) Remove(Item) Name: 组件名称 Item:组件 |
通过项目集合,可以返回集合中指定名称的菜单组件,例如:
Dim
btn As RibbonMenu.Button表示禁用Common功能区、Data功能组中的DeleteRow组件,也就是禁用删除行按钮。
由于Groups和Items都是默认属性,所以可简化为:
Dim btn As RibbonMenu.Button
如果喜欢,用一行代码也可以:
RibbonTabs
("Common")("Data")("DeleteRow").Enabled = False利用项目集合,可以动态生成菜单,后面的实战演练会介绍。