MsgBox Statement

መልእክቱን የያዘውን የንግግር ሳጥን ማሳያ

አገባብ:


   MsgBox prompt As String [,buttons = MB_OK [,title As String]]
   response = MsgBox( prompt As String [,buttons = MB_OK [,title As String]])

ደንቦች:

prompt: String expression displayed as a message in the dialog box. Line breaks can be inserted with Chr$(13).

title: String expression displayed in the title bar of the dialog. If omitted, the title bar displays the name of the respective application.

buttons: Any integer expression that specifies the dialog type, as well as the number and type of buttons to display, and the icon type. buttons represents a combination of bit patterns, that is, a combination of elements can be defined by adding their respective values:

የ ተሰየመ መደበኛ

የ ኢንቲጀር ዋጋ

መግለጫ

MB_OK

0

እሺ ቁልፍ ብቻ ማሳያ

MB_OKCANCEL

1

እሺ እና መሰረዣ ቁልፎች ማሳያ

MB_ABORTRETRYIGNORE

2

ማቋረጫ: እንደገና መሞከሪያ: እና መተው ቁልፎች ማሳያ

MB_YESNOCANCEL

3

አዎ: አይ እና መሰረዣ ቁልፎች ማሳያ

MB_YESNO

4

አዎ እና አይ ቁልፎች ማሳያ

MB_RETRYCANCEL

5

እንደገና መሞከሪያ እና መሰረዣ ቁልፎች ማሳያ

MB_ICONSTOP

16

የ ማስቆሚያ ምልክት ወደ ንግግር መጨመሪያ

MB_ICONQUESTION

32

የ ጥያቄ ምልክት ወደ ንግግር መጨመሪያ

MB_ICONEXCLAMATION

48

የ ቃለ አጋኖ ምልክት ወደ ንግግር መጨመሪያ

MB_ICONINFORMATION

64

የ መረጃ ምልክት ወደ ንግግር መጨመሪያ

128

የ መጀመሪያ ቁልፍ በ ንግግር ውስጥ እንደ ነባር ቁልፍ

MB_DEFBUTTON2

256

የ ሁለተኛ ቁልፍ በ ንግግር ውስጥ እንደ ነባር ቁልፍ

MB_DEFBUTTON3

512

የ ሶስተኛ ቁልፍ በ ንግግር ውስጥ እንደ ነባር ቁልፍ


የ ስህተት ኮዶች:

5 ዋጋ የሌለው የ አሰራር ጥሪ

ለምሳሌ:


Sub ExampleMsgBox
 Const sText1 = "An unexpected error occurred."
 Const sText2 = "The program execution will continue, however."
 Const sText3 = "Error"
 MsgBox(sText1 + Chr(13) + sText2,16,sText3)
 MsgBox(sText1 + Chr(13) + sText2, MB_ICONSTOP, sText3)
End Sub

Please support us!