Devuelve un entero que indica el subtipo de un variable.

Sintaxis

VarType ( nombrevar )

Elargumentovarname obligatorio 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.

Comentarios

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 un propiedad predeterminado , 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 = 459StrVar = "Hello World"DateVar = #2/12/69# MyCheck = VarType(IntVar)    ' Returns 2.MyCheck = VarType(DateVar)   ' Returns 7.MyCheck = VarType(StrVar)    ' Returns 8.

¿Necesita más ayuda?

¿Quiere más opciones?

Explore las ventajas de las suscripciones, examine los cursos de aprendizaje, aprenda a proteger su dispositivo y mucho más.

Las comunidades le ayudan a formular y responder preguntas, enviar comentarios y leer a expertos con conocimientos extensos.