Devuelve un entero que indica el subtipo de una variable.
Sintaxis
VarType(nombrevar)
El argumento varnameobligatorio es un tipo de datos Variant que contiene cualquier variable excepto una variable de un tipo definido por el usuario.
Valores devueltos
| Constante | Valor | Descripción |
|---|---|---|
| vbEmpty | 0 | Vacío (no inicializado) |
| vbNull | 1 | Nulo (sin datos válidos) |
| 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 precisión doble |
| 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 (se usa solo con matrices de variantes) |
| vbDataObject | 1,3 | Objeto de acceso a datos |
| vbDecimal | 14 | Valor decimal |
| vbByte | 17 | Valor byte |
| vbUserDefinedType | 36 | Variantes que contienen tipos definidos por el usuario |
| vbArray | 8192 | Matriz |
Nota
Visual Basic para Aplicaciones especifica estas constantes. Los nombres se pueden usar en cualquier lugar del código en lugar de los valores reales.
Observaciones
La función VarType nunca devuelve el valor de vbArray por sí misma. Siempre se agrega a otro valor para indicar una matriz de un tipo determinado. La constante vbVariant solo se devuelve junto con vbArray para indicar que el argumento de la función VarType es una matriz de tipo Variant. Por ejemplo, el valor devuelto para una matriz de enteros se calcula como 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 función VarType 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.