does msgbox return value?

[lezawang]

Hi
I trying to understand how to call functions which return value and that which do not. I thought msgbox is a function that return value, so I tried to assign that value to a variable x but when I msgbox out x the value of x was 1? Any idea why. Thank you so much.

Sub wk_open()
    Dim x As Integer
    x = MsgBox(5)
    MsgBox (x)
End Sub

 

[ScottR]

The value returned by message box is based on the button pressed. A value of 1 is vbOK, vbCancel is equal to 2 and so on. You can refer to the value or the constant name. A quick example...

Dim LResponse As Integer

LResponse = MsgBox("Do you wish to continue?", vbYesNo, "Continue")

If LResponse = vbYes Then
   {...statements...}
Else
   {...statements...}
End If

Edit: Use "Input" rather than "Msgbox" if you want a custom user input.

 

[JLGWhiz]

You can also use TextBox to return values that can be input by users. Or even more sophisticated ComboBox.

BTW, MsgBox is not a function but is a application dialog box call.