Обработка событий панели инструментов

Чтобы получить заготовку для набора кода выполните двойной щелчок на панели инструментов. Если кнопки панели инструментов дублируют команды меню, то необходимо связать соответствующие события, например:

Private Sub ToolBar1_ButtonClick(ByVal Button As MSComctlLib.Button)

On Error Resume Next

Select Case Button.Key

Case "New": mnuFNew_Click

Case "Open": mnuFOpen_Click

Case "Save": mnuFSave_Click

End Select

Err.Clear

End Sub

Обработка событий меню

Все пункты и команды меню имеют одно событие - Click. Чтобы получить заготовку для набора кода – щелкните по команде меню. Некоторые пункты меню могут иметь свойство Checked, Рис. 35, в этом случае, в событии Click необходимо программно изменять значение свойства на противоположное, например:

Private Sub mnuVSBar_Click()

mnuVSBar.Checked = Not mnuVSBar.Checked

End Sub

Private Sub mnuVTbar_Click()

mnuVTbar.Checked = Not mnuVTbar.Checked

End Sub

Рис. 35. Команды меню с флажками

Массивы объектов

Массивом объектов называется совокупность однотипных объектов с одинаковыми именами. Для создания массива объектов на этапе конструирования необходимо:

Создать на объекте-контейнере, например, на Frame1 первый объект, и задать ему имя, например, Option1 Скопировать объект в буфер обмена (нажмите Ctrl+C) Выделить объект-контейнер, на котором будут размещаться объекты, в данном случае - Frame1 Вставить объект из буфера обмена (нажмите Ctrl+V) и подтвердить в окне диалога Visual Basic создание массива. Повторить п.3, п. 4 для вставки необходимого количество объектов.

Рис. 36. Создание массива объектов

Можно создать массив из объектов уже размещенных в контейнере. Для этого задайте свойству Name объектов одно и то же значение, например Option1. После ввода имени для второго объекта, появится окно диалога Visual Basic, в котором следует выбрать "Да" для создания массива.

Массив объектов создается, как правило, для написания более простого и краткого программного кода. В программном коде, при обращении к объекту массива указывается его индекс: ИмяОбъекта(Индекс), например Option1(5).

Создание группы переключателей

Группа переключателей – два и более переключателей – OptionButton, свойство Value которых, взаимозависимо. В группе переключателей нельзя выбрать (установить для свойства Value значение True) более одного переключателя.

Для создания группы переключателей используется объекты-контейнеры, например форма - Form, рамка - Frame (чаще всего) и графическое поле - Picture. Рамка позволяет объединить переключатели в группу не только логически, но и визуально. Отметим, что переключатели в группе совсем необязательно должны быть массивом объектов.

Порядок размещения переключателей в рамках

• Если рамка группирует переключатели, то сначала создается объект – рамка, а затем на нем размещаются переключатели.

• Если рамка не группирует переключатели, то сначала на каком-либо контейнере размещаются переключатели (при этом создается группа), далее поверх них размещается рамка (которая объединяет переключатели лишь визуально) и затем в контекстном меню рамки выбирается команда: Send to Back.

Используя для выделенной группы переключателей приемы вырезания (Ctrl+Х) и вставки (Ctrl+V), можно переносить их с одного объекта-контейнера на другой.