VBA Microsoft Word
Составить программу, которая запрашивает пароль (например, четырехзначное число) до тех пор, пока он не будет правильно введен.
Ответы
Ответ дал:
0
Sub parol()
Dim s As String
While s <> "1234"
s = InputBox("Введи пароль:")
Wend
End Sub
В кавычках вместо 1234 можно задать любой пароль
Dim s As String
While s <> "1234"
s = InputBox("Введи пароль:")
Wend
End Sub
В кавычках вместо 1234 можно задать любой пароль
Похожие вопросы
2 года назад
2 года назад
7 лет назад
7 лет назад
9 лет назад
9 лет назад