1. Пользовательские процедуры

Пользовательская процедура – это подпрограмма. Она начинается с оператора Sub и заканчивается оператором End Sub, между которыми и помещается программный код.

Синтаксис объявления процедуры:

[Public | Private] Sub имя_процедуры (список_параметров)

блок_операторов_1

[Exit Sub]

[блок_операторов_2]

End Sub

Здесь:

Блок_операторов_1 и блок_операторов_2 - это тело (программный код) процедуры.

Имя процедуры - имя объявляемой процедуры.

Список_параметров – это переменные, которые играют роль входных и выходных параметров процедуры.

Exit Sub используется для досрочного прекращения выполнения процедуры (см. Exit For в разделе 2.7.2.4).

Ключевые слова Public или Private, так же, как и для переменной, определяют область видимости процедуры. Они устанавливают, к какому классу принадлежит процедура – к классу глобальных (Public) или к классу локальных (Private) процедур. Локальная процедура доступна только внутри данного модуля, глобальная процедура может быть вызвана из других модулей. Если область видимости явно не указана, то по умолчанию процедура будет отнесена к классу Public.

Для процедуры четко устанавливается перечень входных и выходных данных, то есть входных и выходных параметров.

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

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

Вызов процедуры осуществляется с помощью оператора Call. Его синтаксис:

Call имя процедуры (список параметров)

или

имя процедуры список параметров

Если при вызове процедуры используется ключевое слово Call, то список ее параметров должен быть указан в скобках. Если же процедура вызывается без использования Call, то ее параметры перечисляютс без скобок.

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

Здесь должны соблюдаться следующие правила:

1. Количество значений параметров при вызове равно количеству параметров при объявлении процедуры.

2. Соответствие значений параметров при вызове и параметров в объявлении процедуры определяется их последовательностью в списке.

3. Тип значений параметров при вызове процедуры должен совпадать с типом параметров при ее объявлении.

Необходимо отметить, что процедура может не иметь параметров. В этом случае, если при вызове процедуры использовалось ключевое слово Call, то после имени процедуры следует ставит пустые скобки.

Параметры могут передаваться в процедуру при ее вызове двумя способами:

1. Передача параметров по ссылке. Такие параметры еще называют параметрами-переменными. Данный режим в VB используется по умолчанию. При этом вызываемая процедура может изменить значения тех переменных, которые ей передаются в качестве параметров. Заметим, что в качестве таких параметров могут быть использованы как входные, так и выходные параметры.

2. Передача параметров по значению. Эти параметры носят также название параметров-значений. Для указания такого типа параметра нужно при описании процедуры перед ним использовать ключевое слово ByVal. В таком режиме, для указанных параметров вызываемая процедура не меняет значения переменных, которые передаются ей при вызове. Однако, соответствующие параметры, указанные в объявлении процедуры, будут подвержены изменениям. В качестве параметров-значений могут быть использованы только входные параметры.

Пример.

Private Sub Calc()

Dim x As Single

Dim y

X=3 : Y=5

Call ByReference (x, y) 'результат выполнения: X=4, Y=6

X=3 : Y=5

ByValue x,y 'результат выполнения: X=4, Y=5

End Sub

'процедура передачи параметров по ссылке

Sub ByReference (a As Single, b)

a=a+1

b=b+1

End Sub

'процедура передачи параметров по значению

Sub ByValue (a As Single, ByVal b)

a=a+1

b=b+1

End Sub

Процедура Main. Если в проекте создать общую процедуру с именем Main, то именно с нее начнется выполнение приложения без отображения какой бы то ни было формы. Такие процедуры часто бывают нужными для выполнения некоторых действий по инициализации программы перед загрузкой формы.