Информационные панели

Данные элементы управления представляют собой диалоговые панели, накладываемые на форму. Диалоговые панели относятся к модальным формам. Для выхода из них пользователь должен нажать кнопку. Из информационной панели невозможно перейти к другим элементам текущего приложения. Она обычно используется для вывода на экран коротких сообщений или при организации временного взаимодействия с пользователем. Информационную панель нельзя использовать для вывода справки. Зато она хорошо используется, например, при выдаче сообщения о необходимости перехода к полю ввода перед его редактированием. В информационной панели может быть до 1024 символов, перенос на другую строчку происходит автоматически по правому краю.

Оператор MsgBox, выводящий информационную панель, имеет следующий формат:

MsgBox "ТекстСообщения", ТипОкна, "ТекстЗаголовкаПанели"

Например: MsgBox "Нажмите на клавишу"

Функция MsgBox() требует того же набора параметров, что и оператор MsgBox. Разница в том, что функция MsgBox () возвращает зачение, благодаря которому можно определить, какую из кнопок окна сообщения выбрал пользователь.

Например:

Y=MsgBox ("Вы хотите выйти из программы?", vbYesNo)

Для описания типа информационной панели используются встроенные числовые константы, определяющие наличие кнопок и значков на панели. Перечень констант приведен в таблице 2.3:

Таблица 2.3

Символьная константа	Значение	Описание
VbOKOnly		только кнопка ОК
vbOKCancel		кнопки ОК и Cancel
vbAbortRetryIgnore		Кнопки Abort,Retry,Ignore
vbYesNoCancel		Кнопки Yes,No,Cancel
VbYesNo		Кнопки Yes,No
vbRetryCancel		Кнопки Retry,Cancel
Продолжение таблицы 2.3
VbCritical		значок Critical Message
vbQuestion		значок Warning Query
vbExclamation		значок Warning Message
vbInformation		значок Inform. Message

Можно комбинировать размещение различных кнопок и значков на

одной панели:

Response = MsgBox ("Вы уверены, что хотите выйти из_ программы?", vbYesNo + vbQuestion, "Сообщение").

Таблица 2.4. Значения, возвращаемые функцией MsgBox()

Символьная константа	Значение	Описание
VbOK		кнопка OK
VbCancel		отмена
VbAbort		стоп
VbRetry		повтор
VbIgnore		пропуск
VbYes		кнопка Yes
VbNo		кнопка No

Например, чтобы определить, какая кнопка выбрана пользователем, нужно проанализировать значение переменной Response.

If Response = vbYes Then

Дата добавления: 2014-12-10