Выход из программы.Ввод пароля - VB
Формулировка задачи:
Подскажите, не могу найти инфу никак. При запуски программы появляется окошко с предложением ввести пароль. Две кнопки - ок и cancel. При нажатии на cancel надо выйти из программы
1) как можно выйти из программы?
2) при нажатии на ok мы должны проверить на правильность, проверили, если все хорошо, продолжаем выполнение программы, если неправильно предлагаем еще раз ввести пароль. как это сделать?
Решение задачи: «Выход из программы.Ввод пароля»
textual
Листинг программы
Option Explicit Private Sub Form_Load() Dim re 1 re = InputBox("Введите проль", "Проверка пароля") Select Case re Case 123 ' это пароль Exit Sub Case "" Unload Me Case Else MsgBox "Пароль не верный", vbCritical, "Повторите ввод" GoTo 1 End Select End Sub
ИИ поможет Вам:
- решить любую задачу по программированию
- объяснить код
- расставить комментарии в коде
- и т.д