N00b msgbox question

[dgillz]

I have a Message box snippet of code:

MsgBox("Ready to continue?)

However this just presents the user an "OK" button. I need to display 2 buttons, Yes and No.

Software Sales, Training, Implementation and Support for Macola, eSynergy, and Crystal Reports

http://www.gainfocus.biz

"If you have a big enough dictionary, just about everything is a word"
--Dave Barry

 

[PHV]

Put the cursor inside the MsgBox word in your code and press the F1 key.

Hope This Helps, PH.
FAQ219-2884
FAQ181-2886

 

[dgillz]

I have already done this. I see the vbYesNo suggested, but I cannot get it to work. The suggested syntax:

MsgBox(prompt[, buttons] [, title] [, helpfile, context])

Does not work in the 5 or 6 tries I have already attempted.

Anything beyond asking me to look at the help files is appreciated. Maybe some sample code?




Software Sales, Training, Implementation and Support for Macola, eSynergy, and Crystal Reports

http://www.gainfocus.biz

"If you have a big enough dictionary, just about everything is a word"
--Dave Barry

 

[PHV]

A starting point:
If MsgBox("Ready to continue?", vbYesNo) <> vbYes Then
Exit Sub
End If

Hope This Helps, PH.
FAQ219-2884
FAQ181-2886

 

[fumei]

MsgBox(prompt[, buttons] [, title] [, helpfile, context])

Does not work in the 5 or 6 tries I have already attempted.

It would also be helpful (and is generally a good rule) that when you mention "tries", that you actually post the code you did try.

MsgBox("Ready to continue?", vbYesNo) (from PHV, which does work) does not look all that different from

MsgBox("Ready to continue?) - which you say you trued.

Although....it does need the "" at the end.

faq219-2884

Gerry
My paintings and sculpture

 

[yogia]

Hi dgillz:

Here is an illustration that might be of some help ...

Sub y_2()
    'May-27-2007 Yogi Anand
    msg1 = MsgBox("Ready to continue?", vbYesNoCancel)
    If msg1 = vbYes Then
        '... the part if Yes was pressed
        ElseIf msg1 = vbNo Then
        '... the part if No was pressed
        Else
        '... the part if Cancel was pressed
    End If
End Sub

Yogi Anand, D.Eng, P.E.
Energy Efficient Building Network LLC

http://www.energyefficientbuild.com

 

[fumei]

OR...

Dim msg1 As VbMsgBoxResult
    msg1 = MsgBox("Ready to continue?", vbYesNoCancel)
    Select Case msg1
      Case 6
        '...Yes was pressed
      Case 7 
        '...No was pressed
      Case 2
        '...Cancel was pressed
    End Select

Note that the value 2 is returned by both the actual Cancel button, and clicking the "x" Close button.

You can use either the number, or the text (eg. 6, or vbYes) in your code. Most people use the text. However, there are circumstances when you may want to know the history of the messagebox use. By using a counter, and the accumulated value of the response, you can get that history. Although not the order.

Eg.
accumulated value = 6, counter = 3
The messagebox was used three times, Cancelled everytime ( 2 + 2 + 2)

accumulated value = 6, counter = 1
The messagebox was used once, Yes was clicked

accumulated value = 21, counter = 4
The messagebox was used 4 times, two Yes, one No, one Cancel

accumulated value = 21, counter = 3
The messagebox was used 3 times, three No

etc. etc.

faq219-2884

Gerry
My paintings and sculpture