Общие сведения о константах Microsoft Access

Статья
04/07/2023

Область применения: Access 2013 | Access 2016

Общие

Константой представляет числовое или строковое значение, которое не изменяется. Используйте константы, чтобы улучшить удобочитаемость кода Visual Basic и упростить его обслуживание. Кроме того, использование встроенных констант гарантирует, что код будет продолжать работать, даже если базовые значения, представленные константами, будут изменены в последующих выпусках Microsoft Access.

Microsoft Access поддерживает три типа констант:

Символические константы, которые создаются с помощью оператора Const и используются в модулях.
Встроенные константы, которые являются частью Microsoft Access или библиотекой, на которую ссылается ссылка.
Системные константы: True, False и Null.

Символические константы

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

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

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

Const conPI = 3.14159265                ' Pi equals this number. 
Const conPI2 = conPI * 2                ' A constant used to create another. 
Const conVersion = "Version 12.0"       ' Declare a string constant.

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

Помимо констант, объявленных с помощью инструкции Const, Microsoft Access автоматически объявляет ряд внутренних констант и предоставляет доступ к константам Visual Basic для приложений (VBA) и константам объектов данных ActiveX (ADO). Константы также можно использовать в других библиотеках объектов, на которые ссылается ссылка. Дополнительные сведения о добавлении ссылок см. в разделе Установка ссылок на библиотеки типов.

В макросе или Visual Basic можно использовать любую встроенную константу. Эти константы доступны всегда. Конкретные встроенные константы, используемые с определенной функцией, методом или свойством, описаны в разделе справки для этой функции, метода или свойства.

Примечание.

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

Встроенные константы имеют двухбуквенный префикс, определяющий библиотеку объектов, которая определяет константу. Константы из библиотеки Microsoft Access предваряются словом ac; Константы из библиотеки ADO предваряются словом "ad"; и константы из библиотеки Visual Basic предваряются vb. Например:

acForm
adAddNew
vbCurrency

Примечание.

Поскольку значения, представленные внутренними константами, могут измениться в будущих версиях Microsoft Access, следует использовать константы вместо их фактических значений. Однако можно отобразить фактическое значение константы, выбрав константу в обозревателе объектов или введя ? constantname в окне Интерпретация.

Используйте встроенные константы везде, где можно использовать символические или определяемые пользователем константы, в том числе в выражениях. В следующем примере показано, как можно использовать встроенную константу vbCurrency , чтобы определить, является ли переменная Variant , для которой функция VarType возвращает значение 6 ( Currency ):

Dim varNum As Variant 
 
If VarType(varNum) = vbCurrency Then 
    Debug.Print "varNum contains Currency data." 
Else 
    Debug.Print "varNum doesn't contain Currency data." 
End If

Системные константы

Используйте системные константы True, False и Null в любом месте Microsoft Access. Например, можно использовать значение True в следующем выражении условия макроса. Условие выполняется, если значение свойства Visible для формы Employees равно True.

Forms!Employees.Visible = True

Используйте константу Null в любом месте Microsoft Access. Например, можно использовать значение NULL , чтобы задать свойство DefaultValue для элемента управления формой, используя следующее выражение:

=Null

См. также

Поддержка и обратная связь

Есть вопросы или отзывы, касающиеся Office VBA или этой статьи? Руководство по другим способам получения поддержки и отправки отзывов см. в статье Поддержка Office VBA и обратная связь.