Выход из программы.Ввод пароля - 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

ИИ поможет Вам:


  • решить любую задачу по программированию
  • объяснить код
  • расставить комментарии в коде
  • и т.д
Попробуйте бесплатно

Оцени полезность:

8   голосов , оценка 4.125 из 5
Похожие ответы