Função VarType

Aplica-se A
Access para Microsoft 365 Access 2024 Access 2021 Access 2019 Access 2016

Devolve um Número Inteiro que indica o subtipo de uma variável.

Sintaxe

VarType(varname)

O argumento varnamenecessário é uma Variante que contém qualquer variável, exceto uma variável de um tipo definido pelo utilizador.

Valores Devolvidos

Constante Valor Descrição
vbEmpty 0 Vazio (não inicializado)
vbNull 1 Nulo (sem dados válidos)
vbInteger 2 Inteiro
vbLong 3 Número inteiro longo
vbSingle 4 Número de vírgula flutuante de precisão única
vbDouble 5 Número de vírgula flutuante de precisão dupla
vbCurrency 6 Valor de moeda
vbDate 7 Valor da data
vbString 8 Cadeia
vbObject 9 Objeto
vbError 10 Valor de erro
vbBoolean 11 Valor booleano
vbVariant 12 Variante (utilizada apenas com matrizes de variantes)
vbDataObject 13 Um objeto de acesso a dados
vbDecimal 14 Valor decimal
vbByte 17 Valor de byte
vbUserDefinedType 36 Variantes que contêm tipos definidos pelo utilizador
vbArray 8192 Matriz

    

Nota

Estas constantes são especificadas por Visual Basic for Applications. Os nomes podem ser utilizados em qualquer parte do seu código em vez dos valores reais.

Observações

A função VarType nunca devolve o valor para vbArray por si só. É sempre adicionado a outro valor para indicar uma matriz de um tipo específico. O vbVariant constante só é devolvido em conjunto com vbArray para indicar que o argumento para a função VarType é uma matriz do tipo Variante. Por exemplo, o valor devolvido para uma matriz de números inteiros é calculado como vbInteger + vbArray ou 8194. Se um objeto tiver uma propriedade predefinida, VarType(objeto) devolve o tipo de propriedade predefinida do objeto.

Exemplo

Nota

Os exemplos seguintes demonstram a utilização desta função no módulo VBA (Visual Basic for Applications). Para obter mais informações sobre como trabalhar com o VBA, selecione Referência para Programadores na lista pendente junto a Procurar e introduza um ou mais termos na caixa de pesquisa.

Este exemplo utiliza a função VarType para determinar o subtipo de uma variável.

Dim IntVar, StrVar, DateVar, MyCheck
' Initialize variables.
IntVar = 459
StrVar = "Hello World"
DateVar = #2/12/69# 
MyCheck = VarType(IntVar)    ' Returns 2.
MyCheck = VarType(DateVar)   ' Returns 7.
MyCheck = VarType(StrVar)    ' Returns 8.