VB 6. Создание и работа с меню формы

Лабораторная работа №6

*
Разработайте приложение, которое изменяет задний фон текстового  поля из предыдущего занятия, реализовав эту функцию с помощью меню формы

Инструментарий:

объект свойство name
форма
меню формы (MenuStrip) MenuStrip1
visual basic меню формы
Форма «Использование меню»

Выполнение:

  1. Запустите проект из предыдущего занятия. Удалите ListBox (Список).
  2. Для создания меню на панели инструментов выберите MenuStrip . Дважды кликните на появившемся в нижней области окна объекте , а затем перейдите на форму и в области (Вводите здесь) введите меню верхнего уровня  с  текстом Цвет.
  1. Переместитесь на нижнюю область и введите текст Черный. Заполните пункты меню следующим образом:

Цвет

Черный
Красный
Синий
Зеленый
  1. Запустите программу и поэкспериментируйте с меню: выбирайте разные пункты созданного меню.
  2. Запрограммируйте событие Click для каждого пункта меню; например, для пункта Черный необходимо написать следующий код (дважды щелкнув на пункте, чтобы открыть код):
Private Sub ЧерныйToolStripMenuItem_Click(...) ...
     txt.BackColor = Color.Black
End Sub
  1. Запрограммируйте аналогично остальные пункты меню Цвет.
  2. Запустите и отладьте приложение. Сохраните проект.


Дополнительное задание:

  1. При выборе какого-либо пункта меню сделайте его недоступным для повторного выбора (свойство пункта Enabled=false).
  2. Выполните дополнительное задание из занятия № 5, реализовав функцию с помощью меню формы.

Если у Вас возникли вопросы, предлагаем просмотреть видео урок visual basic по выполнению дополнительного задания к данной лабораторной работе.
youTube

Кoроче того, можно просмотреть еще видео-фрагмент:
youTube

Вопросы для самоконтроля:

  1. Каково основное назначение меню формы?
  2. Как запрограммировать необходимый пункт меню?
  3. Какое свойство служит для изменения фона объекта?
  4. С помощью какого свойства меню можно сделать недоступным какой-либо пункт?

* При использовании материалов обязательна ссылка на источник: Майер С.Ф., «MS Visual Basic 2008» — Учебно-методическое пособие : Южный федеральный университет. – Ростов-на-Дону, 2017. – 92 с.