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

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

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

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

операторы VISAUL BASIC

End Sub

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

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

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

или

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

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

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

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

операторы

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

End Function

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

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

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

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

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

• заголовок

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

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

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

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

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

Где:

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

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

опция = Button + Icon + Default (табл. 7.1).

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

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

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

Таблица 7.1

Константы функции MsgBox

Константа	Значение	Описание
Категория: 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	четвертая

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

На рис. 7.1 приведен пример использования процедуры MsgBox для вывода диалогового окна.

Таблица 7.2

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

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

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