Оператор вывода информации MsgBox

Оператор MsgBox является простейшей формой экранного выхода, которую можно включать в процедуры VBA.

Оператор MsgBox подобен встроенной в VBA процедуре.

Sub Name()

MsgBox "Promt", [Buttons As VbMsgBoxStyle = vbOKOnly], [Title], [HelpFile], [Context]) As VbMsgResult

End Sub

Строка в процедуре Name(), содержащая оператор MsgBox, сообщает VBA, что необходимо вызвать эту встроенную процедуру. Текст, заключенный в кавычки, – это текст сообщения, которое должно отображаться с помощью MsgBox.

Оператор MsgBox имеет несколько аргументов. Первый аргумент Promt является текстом, который должен быть отображен в выводимом диалоговом окне посредством MsgBox. Пример синтаксиса оператора MsgBox (рис. 5):

Рис. 5. Пример реализации оператора MsgBox

Sub Privet()

MsgBox "Привет!!!",, "Окно приветствия!"

End Sub

Текст "Привет!!!" является аргументом для процедуры MsgBox. Двойные кавычки в аргументе "Привет!!!" указывают на то, что текст, заключенный в них является данными для процедуры, а не инструкциями, которые должен выполнить VBA.

Второй аргумент оператора MsgBox Buttons As VbMsgBoxStyle = vbOKOnly является необязательным; в данном примере необязательный второй аргумент опущен. Поскольку необязательный аргумент опускается, в списке аргументов имеется один символ пробела. За символом пробела следует запятая, чтобы отделить его от следующего аргумента в списке. Если вы не введете символ пробела, VBA добавляет его.

Необязательный второй аргумент в операторе MsgBox – это аргумент Buttons. Он определяет, сколько и какого типа командные кнопки появляются в диалоговом окне, отображаемом посредством MsgBox. Когда необязательный второй аргумент опущен (как в данном примере), диалоговое окно содержит только одну кнопку – OK.

Третий аргумент Title в операторе MsgBox определяет заголовок диалогового окна. Подобно первому аргументу текст, для строки заголовка диалогового окна заключается в кавычки. Таким образом, процедура Privet() выведет на экран следующее диалоговое окно: