Зміст
Покажчик 🔎︎

# Інструкція MsgBox

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

## Синтаксис:

    MsgBox Текст As String [,Тип As Integer [,Заголовок As String]] (As Statement) або Повідомлення (Текст As String [,Тип As Integer [,Заголовок As String]]) (As Function)

## Параметр:

Текст: Рядковий вираз, що відображається як повідомлення у діалоговому вікні. Переноси рядків можна вставити за допомогою Chr$(13).

Заголовок: Рядковий вираз, який відображається в заголовку діалогового вікна. Якщо параметр пропущено, то у рядку заголовка відображається ім'я відповідної програми.

Тип: вираз з цілих чисел, що вказує тип діалогового вікна, а також число і тип кнопок і тип піктограм. Тип представляє комбінацію бітових масок, тобто комбінація елементів може визначатися додаванням відповідних значень:

Іменована константа | Ціле значення | Опис
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