Fonction TypeName ; Fonction VarType
Renvoie une chaîne (TypeName) ou une valeur numérique (VarType) contenant les informations relatives à une variable donnée.
Syntaxe :
TypeName (Variable) / VarType (Variable)
Valeur de retour :
Chaîne de caractères ; nombre entier
Paramètres :
Variable : variable dont vous vous voulez déterminer le type. Vous pouvez utiliser les valeurs suivantes :
|
Mot-clé |
Constante nommée |
VarType |
Type de variable |
|
Boolean |
|
11 |
Variable logique |
|
Date |
V_DATE |
7 |
Variable de date |
|
Currency |
V_CURRENCY |
6 |
Variable monétaire |
|
Double |
V_DOUBLE |
5 |
Variable double à virgule flottante |
|
Integer |
V_INTEGER |
2 |
Variable numérique entière |
|
Long |
V_LONG |
3 |
Variable numérique entière longue |
|
Object |
|
9 |
Variable d'objet |
|
Single |
V_SINGLE |
4 |
Variable simple à virgule flottante |
|
String |
V_STRING |
8 |
Variable de chaîne de caractères |
|
Variant |
|
12 |
Variable variant (peut contenir tous les types spécifiés par la définition) |
|
Empty |
V_EMPTY |
0 |
Variable non initialisée |
|
Null |
V_NULL |
1 |
Absence de données valides |
Exemple :
Sub ExampleType
Dim iVar As Integer
Dim sVar As String
Dim siVar As Single
Dim dVar As Double
Dim bVar As Boolean
Dim lVar As Long
Dim cVar as Currency
Dim tVar as Date
MsgBox TypeName(iVar) & " " & VarType(iVar) & Chr(13) &_
TypeName(sVar) & " " & VarType(sVar) & Chr(13) &_
TypeName(siVar) & " " & VarType(siVar) & Chr(13) &_
TypeName(dVar) & " " & VarType(dVar) & Chr(13) &_
TypeName(bVar) & " " & VarType(bVar) & Chr(13) &_
TypeName(cVar) & " " & VarType(cVar) & Chr(13) &_
TypeName(tVar) & " " & VarType(tVar) & Chr(13) &_
TypeName(lVar) & " " & VarType(lVar),0,"Certains types dans LibreOffice Basic"
End Sub