Переключение между пунктами подменю

'Создать меню с названиями подменю MyMenu. Подменю MyMenu должно
'содержать индекс (от 0 до...)

Private Sub MyMenu_Click(Index As Integer)
Static prevSelection As Integer
MyMenu(prevSelection).Checked = False
MyMenu(Index).Checked = True
prevSelection = Index
End Sub

Обсудить статью на форуме

Если Вас заинтересовала или понравилась информация программирование на Visual Basic - "Переключение между пунктами подменю", Вы можете поставить закладку в социальной сети или в своём блоге на данную страницу:

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