Процедуры, функции, передача параметров, область видимости.

Различают процедуру (Sub), не возвращающую значение, и функцию (Function), то есть возвращающую значение программу. В VBA несколько различается синтаксис передачи параметров в процедуру и в функцию: параметры процедуры не заключаются в круглые скобки. Вызов функции обычно встречается в выражении. Но разрешен процедурный вызов функции, при этом, очевидно, возвращаемый результат теряется.

В процедуру или функцию можно передавать параметры. Описание параметров (аргументов) – это список формальных параметров. Он должен включать имена параметров. Параметр может быть обязательным или опциональным (с описателем Option). В описании параметров можно сразу задавать и значение «по умолчанию» (после имени пишется "= значение"). Это необходимо в случае задания неполного списка параметров при вызове функции (или процедуры), что возможно для опциональных параметров.

Не обязательным является описатель типа параметра (по умолчанию – Variant). Кроме того, можно указать способ передачи параметра: по ссылке (ByRef) и по значению (ByVal). При передаче параметра по ссылке его изменение внутри процедуры изменяет фактически переданную переменную. При передаче параметра по значению в локальной памяти процедуры формируется собственная переменная, начальное значение которой соответствует значению фактического параметра (он при этом он может быть произвольным выражением!).

В VBA допускается позиционная передача параметров и поименованная. При позиционной передаче фактические параметры должны находиться строго в тех позициях, в которых встречаются соответствующие формальные. Если список параметров достаточно длинный, и достаточно большое количество параметров носит опциональный характер, то вызов функции выглядит не очень симпатично, например, так: Documents.Open(“doc12.doc”,,,,”1”). Видимо, понятнее и проще написать так: Documents.Open(PasswordDocument := ”1”,FileName:=“doc12.doc”). Очевидно, что оба способа вызова допустимы и для встроенных и для написанных функций.

VBA по умолчанию не требует описания переменных, но строго контролирует совпадение типа при передаче параметров по ссылке. Если Вы хотите включить контроль типов для любых ситуаций, то поставьте в модуле в самой первой строке описатель Option Explicit. При этом VBA будет контролировать использование переменных и выдавать сообщение об ошибке, например, в таком случае:

Dim i1 as Integer, i2 as Single

i2=10.5

For i1=1 to 10

i1=(i2+i1)/3

Подобный контроль поможет вам быстрее отладить вашу программу.

Для того же рекомендуется использовать описание констант. Если некоторая величина встречается в программе неоднократно, но не изменяется, опишите ее в виде константы. После этого VBA не позволит вам допустить ошибку – изменить ее значение. Описание выглядит так: Const pi=3.14

При описании переменных указывается область видимости (или по-другому, доступности): область_видимости имя As тип

Здесь область_видимости – один из описателей: Dim, Public, Private, Static. Dim – переменные, описанные таким образом на уровне модуля доступны в текущем модуле, а переменные, описанные внутри процедуры, доступны только внутри процедуры. Описатель Public может использоваться только на уровне модуля. Такие переменные доступны во всем проекте. Если у модуля не стоит описатель Option Private Module , то Public переменные доступны и из других приложений. Описатель Private тоже используется на уровне модуля и описывает переменные, доступные только внутри данного модуля. Static – переменная сохраняет свое значение между вызовами функции, но остается невидимой за ее пределами.

В механизме статических переменных VBA, по-видимому, есть ошибка. При добавлении элемента управления на лист, видимо перестраивается объектная модель, причем делается это сразу после завершения текущей процедуры, потому теряются значения статических переменных.

Типы данных.

Набор встроенных типов данных обычный: Integer, Long, String, Byte и т.д.

Программист может создавать свои типы данных. Если тип данных состоит только из набора свойств, то следует воспользоваться описателем структур – Type. Пользовательские типы (структуры) можно задавать только на уровне модуля, то есть в общей области модуля (не внутри процедур, не внутри обработчиков событий!). Очевидно, что при описании пользовательского типа память под переменные не выделяется. Для того чтобы создать переменную пользовательского типа следует ее описать с помощью описателя dim в процедуре или с помощью описателя public или private в общей области.

Пример:

Type rabotnic

ID As Integer

Name As String * 20

Address As String * 30

Phone As Long

HireDate As Date

End Type

Sub CreateRecord()

Dim r As rabotnic

…

r.ID = 12003