Основные возможности Visual Basic. Макова Н.Е. - 21 стр.

         Стрелки сдвигают выделенный пункт меню, Delete удаляет, Insert
         вставляет новый пункт.
              Все в порядке - внешний вид меню готов. Запустите проект.
         Вы видите, что меню появилось на форме. Пощелкайте по пунк-
         там. Естественно, ничего не происходит. Для того чтобы проис-
         ходило, нужно заставить меню работать, а для этого нужно для
         каждого пункта написать свою процедуру.
              Заставляем меню работать. В режиме проектирования
         выберем пункт меню ••••• и щелкнем по нему. В окне кода появ-
         ляется заготовка процедуры:
                         Private Sub пункт_меню_Синий_Сlick()
                         End Sub
         Вы уже наверняка догадались, что это приглашение объяснить
         компьютеру, что нужно делать при выборе пункта •••••. Для этого
         подойдет оператор который красит форму в синий цвет.

                                   Forml.BackColor = vbBlue

              Аналогично программируем пункт Зеленый. А сообщение о
         программе обеспечит оператор
                   MsgBox ("Программа создана в 2006 году")

                Запустите проект и проверьте, как он работает.




                                                                             21

PDF created with FinePrint pdfFactory Pro trial version www.pdffactory.com