7.5. Процедуры и функции.

Процедура это программа, которая может быть вызвана на выполнение другой программой или событием.

В VISAUL BASIC весь программный код находится внутри процедур (подпрограмм). Общая структура описания подпрограммы VISAUL BASIC:

Sub имя_подпрограммы[(аргументы)]

операторы VISAUL BASIC

End Sub

Такие процедуры могут вызываться или самим VISAUL BASIC (процедуры обработки событий) или другими процедурами.

Вызов подпрограммы:

Call имя_подпрограммы[(параметры)]

или

имя_подпрограммы [параметры]

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

Общая структура описания функции:

Function имя_функции[(аргументы)][As Тип]

операторы VISAUL BASIC

имя_функции=выражение

End Function

Вызов функции:

переменная=имя_функции[(аргументы)]

7.6. Вывод данных в стандартное диалоговое окно.

Для вывода различных сообщений используется стандартное диалоговое окно - MsgBox. Вид этого окна может быть различным, но оно всегда включает следующие компоненты:

• текст сообщения

• заголовок

• пиктограмма

• набор кнопок

Диалоговое окно MsgBox можно выводить как процедурой, так и как функцией MsgBox.

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

переменная = MsgBox(текст[, опция][, заголовок][, файл справки, контекст])

Здесь:

текст – строковое выражение, отображаемое как сообщение в диалоговом окне (максимальная длина 1024 символа);

опция – дополнительная информация. Эта опция представляет собой числовое значение, составленное как сумма значений, которые указывают число и тип отображаемых кнопок, тип используемого значка, основную кнопку. (Значение по умолчанию=0).

опция = Button + Icon + Default (см. таблицу 7).

заголовок - строковое выражение, отображаемое в строке заголовка диалогового окна. Если этот аргумент опущен, то в строку заголовка помещается имя приложения.

файл справки – строковое выражение, определяющее имя файла справки, содержащего справочные сведения о данном диалоговом окне. Если этот аргумент указан, необходимо также указать аргумент «контекст».

контекст – числовое выражение, определяющее номер соответствующего раздела справочной системы. Если этот аргумент указан, то необходимо указывать аргумент «файл справки».

Примечание: Функцию MsgBox с двумя и более аргументами можно использовать только в выражении (присваивать переменной). Наличие «,», соответствующих отсутствующим аргументам, является обязательным.

Возвращаемое функцией значение позволяет определить, какая кнопка была нажата (см. табл. 2.2).

На рис. 46 – 49 приведены примеры использования процедуры MsgBox для вывода диалоговых окон различных видов.

Константы функции MsgBox Таблица 7

Константа	Значение	Описание
Категория: Button(Кнопки)
vbOKOnly	0	Только кнопка OK
vbOKCancel	1	Кнопки ОК и Отмена
vbAbortRetryIgnore	2	Кнопки Стоп, Повторить, Пропустить
vbYesNoCancel	3	Кнопки Да, Нет, Отмена
vbYesNo	4	Кнопки Да и Нет
vbRetryCancel	5	Кнопки Повторить, Отмена
Категория: Icon (отображение пиктограммы)
vbCritical	16	Критическое сообщение
vbQuestion	32	Вопрос
vbExclamation	48	Предупреждение
vbInformation	64	Информация
Категория:Default (по умолчанию активна кнопка: )
vbDefaultButton1	0	первая
vbDefaultButton2	256	вторая
vbDefaultButton3	512	третья
vbDefaultButton4	768	четвертая

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

Константа	Значение	Нажатая кнопка
vbOK	1	OK
vbCancel	2	Отмена
vbAbort	3	Стоп
vbRetry	4	Повторить
vbIgnore	5	Пропустить
vbYes	6	Да
vbNo	7	Нет

Рис. 46. Пример вывода диалогового информационного окна

Рис. 47. Пример вывода диалогового информационного окна

Рис. 48. Пример вывода диалогового информационного окна

Рис. 49. Пример вывода диалогового информационного окна