Visão geral das constantes do Microsoft Access

Artigo
04/07/2023

Aplica-se ao: Access 2013 | Access 2016

Geral

Uma constante representa um valor numérico ou uma cadeia de caracteres que não é alterado(a). Use constantes para melhorar a legibilidade do código do Visual Basic e facilitar a manutenção do código. Além disso, o uso de constantes intrínsecas garante que o código continuará a funcionar mesmo se os valores de base que as constantes representam forem alterados em versões futuras do Microsoft Access.

O Microsoft Access oferece suporte a três tipos de constantes:

As constantes simbólicas, que você cria usando a instrução Const e são usadas em módulos.
As constantes intrínsecas, que fazem parte do Microsoft Access ou de uma biblioteca referenciada.
As constantes definidas pelo sistema: True (Verdadeiro), False (Falso) e Null(Nulo).

Constantes simbólicas

Normalmente, você usará os mesmos valores repetidamente no código, ou descobrirá que o código depende de certos números que não têm significado óbvio. In these cases, you can make the code much easier to read and maintain by using symbolic or user-defined constants, which enable you to use a meaningful name in place of a number or string.

Once you have created a constant by using the Const statement, you can't modify it or assign a new value to it. Você também não poderá criar uma constante que tem o mesmo nome que uma constante intrínseca.

O exemplo a seguir mostra algumas das formas nas quais você pode usar a instrução Const para declarar constantes numéricas e sequências:

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.

Constantes intrínsecas

Além das constantes que você declara com a instrução Const, o Microsoft Access declara automaticamente um número de constantes intrínsecas e fornece acesso a constantes do Visual Basic for Applications (VBA) e do ActiveX Data Objects (ADO). Também é possível usar as constantes em outras bibliotecas de objeto referenciadas. Para obter mais informações sobre como adicionar referências, consulte Definir referências para digitar bibliotecas.

Qualquer constante intrínseca pode ser usada em uma macro ou no Visual Basic. Essas constantes estão disponíveis o tempo todo. As constantes internas específicas, usadas com uma função, um método ou uma propriedade particular são descritas no tópico da Ajuda desta função, método ou propriedade.

Observação

Use o Navegador de Objetos para exibir listas de constantes intrínsecas de todas as bibliotecas de objetos disponíveis.

Constantes intrínsecas têm um prefixo de duas letras identificando a biblioteca de objetos que define a constante. As constantes da biblioteca do Microsoft Access são precedidas por "ac"; as constantes da biblioteca do ADO são precedidas por "ad" e as constantes da biblioteca do Visual Basic são precedidas por "vb". Por exemplo:

acForm
adAddNew
vbCurrency

Observação

[!OBSERVAçãO] Because the values represented by the intrinsic constants may change in future versions of Microsoft Access, you should use the constants instead of their actual values. You can, however, display the actual value of a constant by choosing the constant in the Object Browser or by typing ? constantname na janela Imediata.

Use constantes intrínsecas onde quer que você possa usar constantes simbólicas ou definidas pelo usuário, inclusive em expressões. O exemplo a seguir mostra como você pode usar a constante intrínseca vbCurrency para determinar se a variável é uma Variant para a qual a função VarType retorna 6 ( Conversor de Moedas ):

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

Constantes definidas pelo sistema

Use as constantes definidas pelo sistema True, False e Null em qualquer lugar no Microsoft Access. For example, you can use True in the following macro condition expression. The condition is met if the Visible property setting for the Employees form equals True.

Forms!Employees.Visible = True

Use o Null constante em qualquer lugar no Microsoft Access. For example, you can use Null to set the DefaultValue property for a form control by using the following expression:

=Null

Confira também

Suporte e comentários

Tem dúvidas ou quer enviar comentários sobre o VBA para Office ou sobre esta documentação? Confira Suporte e comentários sobre o VBA para Office a fim de obter orientação sobre as maneiras pelas quais você pode receber suporte e fornecer comentários.

Compartilhar via