Практическая работа 37. Меню
Date: 2015-10-07; view: 332.
Создать меню, команда которого позволяет вывести системную информацию Мicrosoft; ниже дана последовательность действий:
· маркировать форму, стартовать редактор меню,
· cоздать меню, задав: Name = mnuSysInfMicrosoft (Caption = SystInfMicrosoft) и Name = mnuEnd,
· добавить в проект форму About Dialog, для этого использовать меню Проект 
Добавить форму About Dialog Открыть,
· ввести код, данный ниже:
· Private Sub mnuSysInfMicrosoft_Click()· frmAbout.Show vbModal· End Sub· · Private Sub mnuEnd_Click()· EndEnd Sub· после старта проекта выбрать команду меню SysInfMicrosoft, сделать щелчок на этой кнопке, выводится диалоговое окно About, после щелчка на нижней кнопке выведенного диалогового окна выводится системная информация Microsoft.
| <== previous lecture | | | next lecture ==> |
| Объект меню | | | Практическая работа 38. Мышь |