Иллюстрированный самоучитель по VB.NET


         

Чтобы быстро изменить свойство Name


Friend WithEvents mnuFile As System.Windows.Forms.Menultem

Friend WithEvents mnuEdit As System.Windows.Forms.MenuItem

Friend WithEvents mnuHelp As System.Windows.Forms.Menultem

Friend WithEvents mnuOpen As System.Windows.Forms.Menultem

Friend WithEvents mnuSave As System.Windows.Forms.Menultem

Friend WithEvents mnuExit As System.Windows.Forms.Menultem

Чтобы быстро изменить свойство Name команд меню, щелкните на команде правой кнопкой мыши и выберите в контекстном меню команду Edit Names (завершив редактирование, выйдите из этого режима при помощи контекстного меню).

Экземпляр главного меню создается командой, которую IDE включает в метод

InitializeComponent:

Me. MainMenul =New System. Windows. Forms. MainMenu ()

Следующий фрагмент создает в методе Initial! zeComponent объекты отдельных команд меню:

Me.mnuFile = New System. Windows. Forms. MenuItem()

Me.mnuNew = New System. Windows. Forms. MenuItem()

Me.mnuOpen = New System. Windows. Forms. MenuItem()

Как видно из этого фрагмента, меню File верхнего уровня тоже представлено экземпляром класса Menultem. Объекты команд включаются в экземпляр Mai nMenu вызовом метода AddRange класса Menultems. В следующем примере метод AddRange включает в меню сразу три команды:

Me . Mai nMenul . Menultems . AddRange( New System . Windows . Forms . Menultem( )

{Me.mnuFile. Me.mnuEdit, Me.mnuHelp})

Поскольку у объектов отдельных команд тоже имеется свойство Menultems, автоматически сгенерированный код включения команд выглядит практически так же:

Me . mnuFile . Menu Items . AddRange ( New System . Windows . Forms . Menul tem( )_

{Me.mnuNew. Me.mnuOpen. Me.mnuExit. Me.mnuSep})

На последнем шаге IDE подключает события Click для команд меню. Сгенерированный код выглядит так:

Private Sub mnuExit_Click(ByVal sender As System. Object, _

ByVal e As System. EventArgs)Handles mnuExit. Click




Содержание  Назад  Вперед