Во время выполнения программы получить доступ к меню можно воспользовавшись именем меню. Имя меню устанавливается в редакторе меню.

Теперь на форму добавим две кнопки, которые будет разрешат и запрещать пункты меню.

И код к ним:

Private Sub Command1_Click()

mnuFile.Enabled = False

End Sub



Private Sub Command2_Click()

mnuFile.Enabled = True

End Sub

Мы пользуемся обычным свойством Enabled для доступа к пунктам меню. После нажатия на запретить меню пропадет.