Как может я показывать окно сообщения с двумя кнопками (Например: "on"
, "off"
)?
Возможно, вы захотите сделать что-то вроде этого:
result = MsgBox ("Yes or No?", vbYesNo, "Yes No Example")
Select Case result
Case vbYes
MsgBox("You chose Yes")
Case vbNo
MsgBox("You chose No")
End Select
Чтобы добавить значок:
result = MsgBox ("Yes or No?", vbYesNo + vbQuestion, "Yes No Example")
Другие параметры значка:
vbCritical or vbExclamation
Невозможно сделать. Кнопки MsgBox могут иметь только определенные значения.
Для этого вам придется свернуть свою собственную форму.
Чтобы создать MsgBox с двумя вариантами (Да / Нет):
MsgBox("Some Text", vbYesNo)
MessageboxVBScript Messagebox довольно ограничен в отношении меток, которые вы можете применить к кнопкам, ваш выбор практически ограничен:
Так что вам придется создать свою собственную форму, если вы хотите "ON"/"OFF"
А еще лучше, почему бы не перефразировать запрос в окне так, чтобы работал один из вышеперечисленных вариантов.
Например:
Do you want the light on?
[Yes] [No]
И ради Бога не делайте одно из этих чудовищ пользовательского интерфейса!
Switch setting? (Click "yes" for ON and "No" for Off)
[Yes] [No]