2014-02-03
1054
Окно сообщения (MsgBox)
Диалоговое окно сообщения не требует проектирования и вызывается из программы командой MsgBox (или создается с помощью функции MsgBox()), которая имеет следующий синтаксис:
MsgBox(prompt [, buttons] [, title] [, helpfile, context]),
где
– параметр prompt – обязательный. Эта строка выдается в окне сообщения (максимальная длина текста 1024 символа);
– параметр buttons – необязательный и устанавливает набор кнопок;
– параметр title – текст заголовка окна сообщения;
– параметр helpfile – необязательный, представляет собой ссылку на файл справочной системы;
– параметр context – необязательный, представляет собой ссылку на содержание в файле справочной системы.
Пример:
| MsgBox("Вычисления закончены") | |
| Rez = MsgBox("Закончить вычисления?", vbYesNo, "Мой проект") В зависимости от выбора кнопки "Да" или "Нет" диалоговое окно MsgBox возвращает одно из значений, заданных системными константами. Для определения активной кнопки значение переменной Rez анализируется условным оператором If: If Rez = vbYes then End Функция возвращает значение, соответствующее выбранной пользователем кнопке в окне сообщения. |
Достаточно часто в диалоговом окне необходимо не только активизировать кнопки выбора действия, но и вводить определенную информацию, которая затем анализируется программой. Для выполнения таких действий можно использовать диалоговое окно ввода информации InputBox.
Функция имеет следующий синтаксис:
InputBox (promt [, title] [, default] [,xpos] [, ypos] [, helpfile, context]),
где
– параметр prompt – обязательный. Эта строка выдается в окне сообщения (максимальная максимальная длина текста 1024 символа);
– параметр title – текст заголовка диалогового окна;
– параметр default – строка в текстовом поле. Если параметр отсутствует, строка остается пустой;
– параметр xpos – позиция по вертикали левого верхнего угла диалогового окна относительно левого верхнего угла экрана (по умолчанию присваивается значение, соответствующее середине экрана);
– параметр ypos – позиция по горизонтали левого верхнего угла диалогового окна относительно левого верхнего угла экрана (по умолчанию присваивается значение, соответствующее середине экрана);
– параметр helpfile – необязательный, представляет собой ссылку на файл справочной системы;
– параметр context – необязательный, представляет собой ссылку на содержание в файле справочной системы.
Окно InputBox содержит сообщение о том, какие данные должен ввести пользователь, текстовое поле для ввода данных, две кнопки "ОК" и "Отмена", которые подтверждают или отменяют ввод данных. Если после ввода данных активизируется кнопка "ОК", то значением функции является текст, находящийся в поле ввода, а если – кнопка "Отмена", то значением функции будет пустая строка.
Пример:
| Zn1 = InputBox("Ввести значение") На экране появится диалоговое окно следующего вида. При нажатии кнопки "ОК" переменной Zn1 будет присвоено значение из текстового поля. | |
| Zn2 = InputBox("Ввести значение", "Мой проект", 123) Диалоговое окно имеет следующий вид. При нажатии кнопки "ОК" переменной Zn2 будет присвоено значение из текстового поля. Значение 123 – "значение по умолчанию", которое будет отображаться каждый раз при открытии окна. |
