Retourne un entier indiquant le sous-type d’un variable.
Syntaxe
VarType ( varname )
Leargumentvarname requis est un variant contenant n’importe quelle variable, à l’exception d’une variable d’un type défini par l’utilisateur.
Valeurs de retour
|
Constante |
Valeur |
Description |
|
vbEmpty |
0 |
Vide (non initialisé) |
|
vbNull |
1 |
Null (aucune donnée valide) |
|
vbInteger |
2 |
Entier |
|
vbLong |
3 |
Entier long |
|
vbSingle |
4 |
Nombre à virgule flottante simple précision |
|
vbDouble |
5 |
Nombre à virgule flottante double précision |
|
vbCurrency |
6 |
Valeur en devise |
|
vbDate |
7 |
Valeur de date |
|
vbString |
8 |
String |
|
vbObject |
9 |
Objet |
|
vbError |
10 |
une valeur d’erreur |
|
vbBoolean |
11 |
Valeur booléenne |
|
vbVariant |
12 |
Variant (utilisé uniquement avec les tableaux de variantes) |
|
vbDataObject |
13 |
Objet d’accès aux données |
|
vbDecimal |
14 |
Valeur décimale |
|
vbByte |
17 |
Valeur d’octet |
|
vbUserDefinedType |
36 |
Variantes qui contiennent des types définis par l’utilisateur |
|
vbArray |
8192 |
Array |
Remarque : Ces constantes sont spécifiées par Visual Basic pour Applications. Les noms peuvent être utilisés n’importe où dans votre code à la place des valeurs réelles.
Remarques
La fonction VarType ne retourne jamais la valeur de vbArray par elle-même. Elle est toujours ajoutée à une autre valeur pour indiquer un tableau d’un type particulier. La constante vbVariant est retournée uniquement conjointement avec vbArray pour indiquer que l’argument de la fonction VarType est un tableau de type Variant. Par exemple, la valeur retournée pour un tableau d’entiers est calculée en tant que vbInteger + vbArray, ou 8194. Si un objet a une propriété par défaut , VarType(object) retourne le type de la propriété par défaut de l’objet.
Exemple
Remarque : Les exemples suivants illustrent l’utilisation de cette fonction dans un module Visual Basic pour Applications (VBA). Pour plus d’informations sur l’utilisation de VBA, sélectionnez Référence du développeur dans la liste déroulante en regard de Rechercher et entrez un ou plusieurs termes dans la zone de recherche.
Cet exemple utilise la fonction VarType pour déterminer le sous-type d’une 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.
