Sub ZZZZ()
Dim retVal As Long

retVal = MsgBox("???", vbYesNoCancel + vbQuestion + vbDefaultButton1)

Select Case retVal
Case vbYes
MsgBox "YES"
Case vbNo
MsgBox "NO"
Case vbCancel
MsgBox "CANCEL"
End Select
End Sub


Uzytkownik "Steven Wathen" napisal w
wiadomosci ...

I`ve got a message box with the vbyesnocancel buttons on. How do i make
my program go in different directions depending on the choice made in
the message box. what value or constant changes when each different
button is pressed??

*** Sent via Developersdex http://www.developersdex.com ***
Don't just participate in USENET...get rewarded for it!