msgbox

[klop086]

Уважаемые,
Подскажите, как отловить какую кнопку нажал юзер , если
msgbox "нажмите кнопку", vbyesno
На сколько я знаю - принажатии на кнопку vbyes становится равным 6 или 7, можно ли писать так :
if vbYes=6 then...

[EvilCoder]

Вопрос этот надо было в разделе Новички задавать!

Код: Выделить всё

Private Sub Command1_Click()
retval = MsgBox("Press Any Button!", vbOKCancel, "EvilCoder")
Select Case retval
Case vbOK
    Debug.Print "Press OK button"
Case vbCancel
    Debug.Print "Press Cancel button"
End Select
End Sub

И не константа = 6,7 а возвращаемое значение Функции MsgBox

[klop086]

Да, насчёт того, что надо было этот вопрос в новичках задавать,
но я просто забыл пееёти в этот раздел
Прошу у всех прощения за этот вопрос, впреть такого не повторится
<закрываю тему>