10.6. Константы

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

Использование констант делает программы более наглядными и упрощает внесение в них исправлений. В языке VBA используются константы двух типов — л и т е р а л ь н ы е и с и м в о л и ч е с к и е.

Литеральная константа — это такая константа, действительное значение которой (строка символов или число) записывается прямо в тексте программы. Такие константы можно изменять только при редактировании программного кода. В языке VBA строчные литеральные константы записываются в двойных кавычках (" "), а числовые — без специального форматирования.

Dim Имя As String

Dim Число As Single

Имя = "Саша"

Число = 12.5

Символическая константа, как и переменная, имеет своё имя, но, зато в отличие от переменной, значение такой константы никогда не меняется на всем протяжении выполнения программы.

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

После объявления символическая константа может использоваться в любом месте программы наравне с переменными и с учетом обычных правил для области действия символических имен. Иначе говоря, если константа объявлена в процедуре, то областью ее действия будет только данная процедура. Если вы хотите, чтобы константа была доступна всем процедурам модуля, ее следует определить в области определений данного модуля. Для объявления констант используется ключевое слово Const:

Const СкидкаНаТовар = 12%

Const ВидУслуги = "Кредит"

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

Если при объявлении константы тип данных не указан, то VBA использует тот тип, который будет соответствовать заданному значению. Например, константа, содержащая строку символов, по умолчанию будет сохранена с типом String.

Следует также отметить, что язык VBA предоставляет в распоряжение пользователя набор в н у т р е н н и х констант, которые были определены разработчиками VBA специально. Для того чтобы увидеть полный список внутренних констант, доступных в языке VBA, нужно открыть любой документ Word (или рабочую книгу Excel) и войти в редактор VBA. Это можно сделать, нажав сочетание клавиш <Alt+Fll>.

Теперь в редакторе через меню View надо открыть диалоговое окно Object Browser - обозреватель объектов (рис. 10.2):

Рис. 10.2. Окно обозревателя (Browser) объектов

и в нём выполнить следующие действия:

• в левом верхнем раскрывающемся списке окна Object Browser выберите значение VBA.

• ниже (в поле списка Classes) выберите значение Constants. Справа, в поле списка Members of 'Constants' будет показан полный список внутренних констант языка VBA (рис. 10.3):

Рис. 10.3. Выделен тип и список объектов вида Constant .

• для того, чтобы узнать значение конкретной внутренней константы надо теперь выбрать ее имя в поле списка Members of 'Constants' - в нижнем поле диалогового окна Object Browser будет выведено имя этой константы и ее значение. Более подробные сведения об этой константе (только на английском языке!) можно получить, щелкнув по кнопке Help в окне Object Browser: (рис. 10.4):

Рис. 10.4. Внизу – информация о значении константы: "" - пустая строка

Напоследок заметим, что работать с символической константой очень удобно, так как для изменения её значения нужно отредактировать лишь её объявление. Это можно сделать либо в процедуре, которая ее использует, либо в области объявления модуля (если эта константа используется в нескольких процедурах модуля).