Оператор 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() выведет на экран следующее диалоговое окно: