Private Sub MyApplication_Startup(ByVal sender As Object, ByVal e As Microsoft.VisualBasic.ApplicationServices.StartupEventArgs) Handles Me.Startup
If MessageBox.Show("Exit?", "Выйти?", MessageBoxButtons.YesNo) = DialogResult.Yes Then
     e.Cancel = True ' Активна кнопка YES, нажатие кнопки Enter на клавиатуре
     ' прекращаем работу, т.е. не входим в приложение
     ' Я бы хотел нажать кнопки Enter, чтобы не входить в приложение,
     ' т.е., чтобы, по-моему, была активной кнопка "NOT"
     '+e.Cancel = False ' входим в приложение в любом случае, т.е. при нажатии на
     ' кнопку YES or NO. кнопка NO не активна! Активна кнопка YES
     ' переменная 'e' объявлена в ЗАГОЛОВКЕ ПРОЦЕДУРЫ !
End If
End Sub