IBM Lotus Symphony


Функция MsgBox [встроенная]

Выдает окно с сообщением и возвращает значение.

Синтаксис:

MsgBox (Текст As String [,Тип As Integer [,Заголовок_окна As String]])

Возвращаемое значение:

Integer

Параметры:

Text : строковое выражение, отображаемое в виде сообщения в окне. С помощью Chr$(13) можно вводить разрывы строки.

DialogTitle : строковое выражение, отображаемое в строке заголовка окна. По умолчанию отображается имя соответствующего приложения.

Type : целочисленное выражение, задающее тип окна, а также число и тип отображаемых кнопок и значков. Тип представляет собой сочетание поразрядных шаблонов. Тип — это комбинация битов (элементы окна диалога соответствуют определенной комбинации):

Значения

0 : показать только кнопку OK.

1 : показать кнопки OK и Отмена.

2 : показать кнопки Прервать, Повторить и Игнорировать.

3 : показать кнопки Да, Нет и Отмена.

4 : показать кнопки Да и Нет.

5 : показать кнопки Повторить и Отмена.

16 : добавить в окно значок Остановить.

32 : добавить в окно значок Вопросительный знак.

48 : добавить в окно значок Восклицательный знак.

64 : добавить в окно значок Информация.

128 : сделать кнопкой по умолчанию первую кнопку окна.

256 : сделать кнопкой по умолчанию вторую кнопку окна.

512 : сделать кнопкой по умолчанию третью кнопку окна.

Возвращаемое значение:

1 : OK

2 : Отмена

3 : Прервать

4 : Повторить

5 : Проигнорировать

6 : Да

7 : Нет

Коды ошибок

5 Недопустимый вызов процедуры

Пример:

Sub ExampleMsgBox

Dim sVar as Integer

sVar = MsgBox("Лас-Вегас")

sVar = MsgBox("Лас-Вегас",1)

sVar = MsgBox( "Лас-Вегас",256 + 16 + 2,"Заголовок окна")

end sub


Комментарии по продукту | Дополнительная документация | Товарные знаки