Константы

Константой называют элемент выражения, значение которого не изменяется в процессе выполнения программ. Приведем несколько примеров:

• 75.07 - числовая константа;
• 2.7Е+6 - числовая константа (равна 2 700 000);
• "Ошибка доступа к базе данных" - символьная константа;
• #8/12/1999# - константа типа дата;
• False - логическая константа.

Встроенные константы Visual Basic

Visual Basic содержит огромное количество встроенных констант практически для всех возможных случаев: цвета, клавиши, сообщения и т. п. Встроенные константы имеют префикс vb. Для поиска констант определенной категории воспользуйтесь браузером объектов (рис. 5.3), который открывается при нажатии кнопки Object Browser на стандартной панели инструментов или по клавише F2.

Рис. 5.3. Поиск встроенных констант с помощью браузера объектов

Объявление констант

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

Для объявления константы на уровне процедуры используется оператор Const, имеющий следующий синтаксис:

Const имяКонстанты [As типДанных] = выражение

Например,

Const strDBErrorMessage As String = "Ошибка доступа к базе данных"

При объявлении константы на уровне модуля можно дополнительно указать область ее действия. В этом случае оператор Const имеет следующий синтаксис:

[Public I Private] Const имяКонстанты [As типДанных] = выражение

В приведенном ниже примере константа strDBErrorMessage объявлена глобальной:

Public Const strDBErrorMessage As String = "Ошибка доступа к базе данных"