Інструкція MsgBox

Відображає діалогове вікно, що містить повідомлення.

Синтаксис:


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_ABORTRETRYCANCEL

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 = "Трапилася несподівана помилка."
 Const sText2 = "Однак виконання програми буде продовжено."
 Const sText3 = "Помилка"
 MsgBox(sText1 + Chr(13) + sText2,16,sText3)
 MsgBox(sText1 + Chr(13) + sText2, MB_ICONSTOP, sText3)
End Sub

Будь ласка, підтримайте нас!