- •Построение меню и панелей инструментов
- •Плавающие меню и панели инструментов
- •Объекты и коллекции, применяемые для работы с меню и панелями инструментов
- •Коллекция CommandBars
- •Свойства коллекции CommandBars
- •Методы коллекции CommandBars
- •Объект CommandBar
- •Свойства объекта CommandBar
- •Методы объекта СommandBar
- •Коллекция CommandBarControls
- •Свойства коллекции CommandBarControls
- •Методы коллекции CommandBarControls
- •Объект CommandBarControl
- •Свойства объекта CommandBarControl
- •Методы объекта CommandBarControl
- •Метод Сору
- •Объект CommandBarButton
- •Свойства объекта CommandBarButton
- •Методы объекта CommandBarButton
- •Объект CommandBarComboBox
- •Свойства объекта CommandBarComboBox
- •Методы объекта CommandBarComboBox
- •Объект CommandBarPopup
- •Свойства объекта CommandBarPopup
- •Методы объекта CommandBarPopup
Методы коллекции CommandBars
Коллекция CommandBars имеет четыре метода:
Add
FindControl
FindControls
ReleaseFocus
Метод Add
Метод Add позволяет создать панель команд, которая автоматически добавляется в коллекцию CommandBars. Данный метод возвращает объект CommandBar. Синтаксис метода Add:
Expression.Add(Name, Position, MenuBar, Temporary)
Элементы синтаксиса метода Add представлены в табл. 5.3.
Таблица 5.3. Элементы синтаксиса Add
Элемент |
Описание |
Expression |
Обязательный элемент – выражение, которое возвращает объект CommandBar |
Name |
Имя создаваемой панели команд. Необязательный элемент типа Variant. Если данный аргумент отсутствует, то панели команд будет присвоено имя по умолчанию, например, Настраиваемая 1 |
Position |
Расположение или тип создаваемой панели команд. Необязательный элемент типа Variant.Его значение может равняться значению одной из констант MsoBarPosition, которые описаны в табл.5.4. |
MenuBar |
Необязательный элемент типа Variant. Если данному параметру задать значение True, то активную панель меню можно поменять на создаваемую панель команд. По умолчанию значение данного аргумента равняется False |
Temporary |
Необязательный элемент типа Variant. Если задать данному параметру значение True, то создаваемая панель команд будет временной. Иначе говоря, после закрытия приложения данная панель инструментов будет удалена. По умолчанию значение данного аргумента равняется False |
Таблица 5.4. Константы, определяющие расположение или тип добавляемой панели команд
Константа |
Описание |
msoBarLeft, msoBarTop, msoBarRight, msoBarBottom |
Указывают соответственно левую, верхнюю, правую и нижнюю координаты новой панели команд |
msoBarFloating |
Определяет, что добавляемая панель будет перемещаемой |
msoBarPopup |
Указывает, что создаваемая панель команд будет выполнять функции контекстного меню |
msoBarMenuBar |
Используется только в версии MS Office для Macintosh |
Метод FindControls
Метод FindControls возвращает коллекцию CommandBarControls, которая удовлетворяет определенным критериям. Синтаксис метода FindControls: Expression.FindControl (Type, Id, Tag, Visible)
Здесь Expression — обязательный элемент синтаксиса, который представляет собой выражение, возвращающее коллекцию CommandBars. Остальные элементы синтаксиса данного метода имеют то же функциональное назначение, что и элементы метода FindControl объекта CommandBar (см. далее).
Метод ReleaseFocus
Данный метод убирает фокус со всех панелей команд. Синтаксис метода ReleaseFocus:
Expression. ReleaseFocus
Элемент синтаксиса Expression представляет собой выражение, которое возвращает объект CommandBars.
Объект CommandBar
Объект CommandBar предоставляет доступ к панелям команд. Все объекты CommandBar являются членами коллекции CommandBars