Retorna um Integer que indica o subtipo de uma variável.
Sintaxe
VarType(varname)
O argumento necessário varname é um Variant que contém qualquer variável, exceto um tipo definido pelo usuário.
Retornar valores
| Constante | Valor | Descrição |
|---|---|---|
vbEmpty |
0 | Vazio (não diferenciado) |
vbNull |
1 | Nulo (sem dados válidos) |
vbInteger |
2 | Inteiro |
vbLong |
3 | Inteiro longo |
vbSingle |
4 | Número de ponto flutuante de precisão única |
vbDouble |
5 | Número de ponto flutuante de precisão dupla |
vbCurrency |
6 | Valor da moeda |
vbDate |
7 | Valor da data |
vbString |
8 | Cadeia de caracteres |
vbObject |
9 | Objeto |
vbError |
10 | Valor de erro |
vbBoolean |
11 | Valor booliano |
vbVariant |
12 |
Variant (usado apenas com matrizes de variantes) |
vbDataObject |
13 | Um objeto de acesso a dados |
vbDecimal |
14 | Valor decimal |
vbByte |
17 | Valor byte |
vbUserDefinedType |
36 | Variantes que contêm tipos definidos pelo usuário |
vbArray |
8192 | Matriz |
Observação
Essas constantes são definidas por Visual Basic for Applications (VBA). Você pode usar os nomes em qualquer lugar do código em vez dos valores reais.
Comentários
A VarType função nunca retorna o valor por vbArray si só. Ele sempre adiciona esse valor a outro valor para indicar uma matriz de um tipo específico.
A vbVariant constante é retornada apenas com vbArray para indicar que o argumento para VarType é uma matriz de Variant valores. Por exemplo, o valor retornado para uma matriz de inteiros é vbInteger + vbArray, ou 8194.
Se um objeto tiver uma propriedade padrão, VarType(object) retornará o tipo da propriedade padrão do objeto.
Exemplo
Observação
Exemplos a seguir demonstram o uso dessa função em um módulo VBA (Visual Basic for Applications). Para obter mais informações sobre como trabalhar com o VBA, selecione Referência do Desenvolvedor na lista suspensa ao lado de Pesquisar e insira um ou mais termos na caixa de pesquisa.
Este exemplo usa a VarType função 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.