Тема: VBScript: Функция InputBox
Добрый день. Подскажите можно ли взаимодействовать с кнопками OK и Cancel в этой функции, если можно, то приведите пример пожалуйста.
1 2013-02-13 17:30:23 (изменено: alexii, 2013-02-13 17:43:06)
Re: VBScript: Функция InputBox
Поясните, что Вы подразумеваете под взаимодействием.
Re: VBScript: Функция InputBox
alexii пишет:
Поясните, что Вы подразумеваете под взаимодействием.
Например:
Dim Window(2)
Window(0) = InputBox ("Введите значение 1", "Окно1")
Window(1) = InputBox ("Введите значение 2", "Окно2")
Window(2) = InputBox ("Введите значение 3", "Окно3")
MsgBox Window(0) + Window(1) + Window(2)
По очереди откроется 3-и окна, куда нужно ввести значение. В каждом окне есть кнопки OK и Отмена.
Если нажать на кнопку Отмена, то произойдет тоже самое, если бы нажали на кнопку ОК.
Я бы хотел при нажатии на кнопку Отмена, что бы сценарий завершался.
Re: VBScript: Функция InputBox
Что мешает прочитать справку по InputBox (InputBox Function) и сделать потребное?
Re: VBScript: Функция InputBox
alexii пишет:
Что мешает прочитать справку по InputBox (InputBox Function) и сделать потребное?
Спасибо alexii, направил на путь истинный )). У меня другая справка, там к сожалению нет "If the user clicks OK or presses ENTER, the InputBox function returns whatever is in the text box. If the user clicks Cancel, the function returns a zero-length string ("")."
Вот что у меня получилось:
Dim Window(2)
Window(0) = InputBox ("Введите значение 1", "Окно1")
If Window(0) = "" Then
Wscript.Quit()
End If
Window(1) = InputBox ("Введите значение 2", "Окно2")
If Window(1) = "" Then
Wscript.Quit()
End If
Window(2) = InputBox ("Введите значение 3", "Окно3")
If Window(2) = "" Then
Wscript.Quit()
End If
MsgBox Window(0) + Window(1) + Window(2)
