Devuelve un entero que indica el subtipo de un variable.
Sintaxis
VarType ( varname )
El valor varnameargumento es una variant que contiene cualquier variable excepto una variable de un tipo definido por el usuario.
Devolver valores
Constante | Valor | Descripción |
---|---|---|
vbEmpty |
0 |
vacío (sin inicializar) |
vbNull |
1 |
Null (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 |
Un 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: Estas constantes se especifican mediante Visual Basic para Aplicaciones. 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í mismo. Siempre se agrega a algún 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 + vbArrayo 8194. Si un objeto tiene un valor propiedad, VarType(objeto) 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 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 junto a Buscar y escriba uno o más 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.