Devuelve una Integer que indica el subtipo de una variable.
Sintaxis
VarType(varname)
El argumento requerido varname es a Variant que contiene cualquier variable excepto un tipo definido por el usuario.
Valores devueltos
| Constante | Valor | Descripción |
|---|---|---|
vbEmpty |
0 | Vacío (sin inicializar) |
vbNull |
1 | Null (no valid data) |
vbInteger |
2 | Entero |
vbLong |
3 | Entero largo |
vbSingle |
4 | Número de punto flotante de precisión simple |
vbDouble |
5 | Número de punto flotante de doble precisión |
vbCurrency |
6 | Valor de moneda |
vbDate |
7 | Valor de fecha |
vbString |
8 | String |
vbObject |
9 | Objeto |
vbError |
10 | Un valor de error |
vbBoolean |
11 | Valor booleano |
vbVariant |
1,2 |
Variant (solo se usa con matrices de variantes) |
vbDataObject |
1,3 | Objeto de acceso de datos |
vbDecimal |
14 | Valor decimal |
vbByte |
17 | Valor de byte |
vbUserDefinedType |
36 | Variantes que contienen tipos definidos por el usuario |
vbArray |
8192 | Matriz |
Nota
Estas constantes las define Visual Basic para Aplicaciones (VBA). Puede usar los nombres en cualquier parte del código en lugar de los valores reales.
Observaciones
La VarType función nunca devuelve el valor por vbArray sí misma. Siempre agrega ese valor a otro valor para indicar una matriz de un tipo determinado.
La vbVariant constante se devuelve solo para vbArray indicar que el argumento para VarType es una matriz de Variant valores. Por ejemplo, el valor devuelto para una matriz de enteros es vbInteger + vbArray, o 8194.
Si un objeto tiene una propiedad predeterminada, VarType(object) devuelve el tipo de la propiedad predeterminada del objeto.
Ejemplo
Nota
Los ejemplos siguientes muestran el uso de esta función en un módulo de Visual Basic para Aplicaciones (VBA). Para obtener más información sobre cómo trabajar con VBA, seleccione referencia para desarrolladores en la lista desplegable situada junto a búsqueda y escriba uno o varios términos en el cuadro de búsqueda.
En este ejemplo se usa la VarType función para determinar el subtipo de una variable.
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.