Sub MessageBox_Demo()
'Message Box with just prompt message
Dim a As String
MsgBox ("Welcome")
'Message Box with title, yes no and cancel Butttons
a = MsgBox("Do you like blue color?", 3, "Choose options")
' Assume that you press Yes Button
MsgBox ("The Value of a is " & a)
End Sub
'Message Box with just prompt message
Dim a As String
MsgBox ("Welcome")
'Message Box with title, yes no and cancel Butttons
a = MsgBox("Do you like blue color?", 3, "Choose options")
' Assume that you press Yes Button
MsgBox ("The Value of a is " & a)
End Sub
0 Comments