Index  определяет индекс (порядковый номер) в массиве элементов управления Menu.

Shortcut  определяет альтернативный вызов команды с клавиатуры. Для этой цели обычно используются клавишиCtrlиAltв сочетании с другими клавишами.

Checked  устанавливает или удаляет флажок рядом с командой. Свойства имеет значениеTrueилиFalse. С помощью этого свойства можно создавать команды-переключатели.

Enabled  свойство, определяющее, доступна или недоступна команда. Если присвоить данному свойству значениеFalse, то команда становится недоступной (заблокированной).

Visible  свойство является логическим. Если установить его значение вFalse, то элемент становится невидимым.

Переход от свойства к свойству делается с помощью клавиши Tab.

После того, как введены значения свойств элемента меню, нужно щелкнуть по клавише Nextи перейти к определению свойств следующего элемента.

Для работы с элементами меню в редакторе служат следующие кнопки:

• Nextперейти к определению следующего элемента;

• Insertдобавить новый элемент выше текущего (выделенного);

• Delete  удалитьтекущий элемент;

•  поместить текущий элемент на один уровеньвниз;

•  поместить текущий элемент на один уровеньвверх;

•  переместить текущий элемент на одну позициювверх;

•  переместить текущий элемент одну позициювниз.

Когда все элементы введены в меню, нажимается кнопка OK.

6. Лабораторная работа № 3 Разработка Меню пользователя

Цельюданной лабораторной работы является объединение лабораторных работ и заданий, выполняемых студентом в течение семестра, в единый пакет.

Задание.

Создать меню, которое позволяет продемонстрировать результаты выполнения лабораторных работ, а также обеспечивает выход из программы в VisualBasic.

Рассмотрим создание меню для просмотра результатов трех лабораторных работ. Создаем двухуровневое меню (рис.15). В строке меню должны быть два заголовка: Лаб.РаботыиВыход. При раскрытии меню

Лаб. Работы, должны появиться пункты меню:

ЛР1.Среда разработки

ЛР2.Процедуры обработки событий

ЛР3. Линейки прокрутки

Порядок выполнения лабораторной работы

1. Создание менюЛаб.Работы.

1. Свойству Caption присвоить значение &Лаб.Работы.

2. Свойству Nameприсвоить значениеmnulab.

3. Нажать клавишу Nextдля того, чтобы перейти к следующему элементу меню.

4. Нажать клавишу  для того, чтобы перейти к следующему уровню (для создания пунктов меню и формирования отступа).

5. Свойству Caption присвоить значениеЛР1.Среда разработки, а свойству Name значениеmnulabL1.

6. Нажать клавишу Next.

7. Свойству Caption присвоить значениеЛР2.Процедуры обработки событий, а свойству Name значениеmnulabL2.

8. Нажать клавишу Next.

9. Свойству Caption присвоить значениеЛР3.Линейки прокрутки,а свойству Name значениеmnulabL3.

2. Создание меню Выход.

2.1. Нажать клавишу Next.

2.2. Нажать клавишу  для того, чтобы вернуться на верхний уровень и убрать отступ.

2.3. Свойству Caption присвоить значение &Выход,а свойству Name значениеmnuExit.

Получаем вид меню, представленный на рис. 15.

Рис. 15. Окно Редактора с созданным меню

После того, как создание меню завершено, следует нажать клавишу OK. Форма с созданным меню представлена на рис.16.

Рис. 16. Форма с созданным меню

Для того, чтобы меню работало, следует записать процедуры обработки события Clickдля каждого пункта меню.

Программные коды

Option Explicit

Dim a As Double

Private Sub mnulabL1_Click()

a = Shell("a:\Лаб1\ЛР1.exe", vbNormalFocus)

End Sub

Private Sub mnuLabL2_Click()

a = Shell("a:\Лаб2\ЛР2.exe", vbNormalFocus)

End Sub

Private Sub mnuLabL3_Click()

a = Shell("a:\Лаб3\ЛР3.exe", vbNormalFocus)

End Sub

Private Sub mnuExit_Click()

End

End Sub

Пояснения к программным кодам. Для того, чтобы использовать функцию Shell, необходимо для каждого демонстрируемого проекта создать исполняемый файл с расширением .exe(менюProject/Make имя_проекта.exe). ФункцияShellзапускает программу. Она возвращает так называемый идентификатор задачи (taskID) запущенной программы.

Синтаксис функции:

Shell(pathname [,windowstyle])

Pathnameсодержит имя исполняемого файла с указанием пути. Если расширение файла не указано, добавляется расширение .exe.

Windowstyleопределяет состояние окна, в котором запускается программа. Если этот аргумент не указан, то принимается значение 2. Значения этого параметра приведены в таблице 10.