VBA для «чайников» (Каммингс) - страница 92

Constant НеизменныйТекст = Вечность

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

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

Имя и переменную типа Date с именем ДеньРождения. В данном случае объявление займет несколько строк:


>

Type Самоделкин

Имя As String

ДеньРождения As Date

End Type


Следующее объявление создает процедуру типа Sub с именем СкрытаяПроцедура, говоря о том, что эта процедура будет локальной в смысле области видимости. Завершающий процедуру оператор End Sub считается частью объявления. Предполагается, что операторы, составляющие тело процедуры, вы должны напечатать сами:


>

Private Sub СкрытаяПроцедура ()

(здесь должны размещаться операторы процедуры )

End Sub


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

Операторы присваивания

Операторы присваивания приписывают переменным или свойствам объектов конкретные значения. Такие операторы всегда состоят из трех частей: имени переменной, или свойства, знака равенства и выражения, задающего нужное значение.

Термин выражение я определю чуть позже, но сначала приведу несколько примеров операторов присваивания. Следующий оператор присваивает переменной МоеЛюбимоеЧисло значение суммы переменной ДругоеЧисло и числа 12:

МоеЛюбимоеЧисло = ДругоеЧисло + 12

Вот оператор, устанавливающий свойство Color (Цвет) объекта AGraphi cShape равным Blue (Синий) в предположении, что Blue является именованной константой, представляющей числовой код соответствующего цвета:

AGraphicShape.Color = Blue

А в следующем операторе, чтобы задать значение переменной КвадратныйКорень, для текущего значения переменной МоеЛюбимоеЧисло вызывается функция Sqr - встроенная функция VBA для вычисления квадратного корня:

КвадратныйКорень = Sqr(МоеЛюбимоеЧисло)

Перед тем как привести примеры, я использовал термин выражение, В VBA выражением называется любой фрагмент программного кода, задающий некоторое числовое значение, строку текста или объект. Выражение может содержать любую комбинацию чисел или символов, констант, переменных, свойств объектов, встроенных функций и процедур типа Function, связанных между собой знаками операций (например, + или *). Вот несколько примеров выражений.


Выражение

Значение

3,14

3,14