Tester le type d'une variable de type "Variant"

Bonjour à tous,

J'ai une petite question sur le type "variant" en VB6.

Je voudrais savoir s'il est possible de tester son type, voire son contenu à un certain moment...???

J'ai ce style de code :

Code:

---

1 2	Public Function MaFonction(ByRef Dom As Variant) As Boolean

---

et j'aimerais, dans ma fonction tester le type de "Dom" voire son contenu

Si quelqu'un a une solution...

Merci d'avance !!

Tester le contenu ? Ben c'est pas trop difficile quand même, un simple "debug.print Dom" devrait suffire

Pour tester le type, tu peux toujours essayer de convertir ta variable dans le type que tu souhaites tester et voir si une erreur se produit et si la valeur convertie est égale à la valeur initiale.
En cas d'erreur, tu l'interceptes bien sûr pour éviter un plantage.
Tu as les fonctions suivantes pour convertir :
CBool(expression)
CByte(expression)
CCur(expression)
CDate(expression)
CDbl(expression)
CDec(expression)
CInt(expression)
CLng(expression)
CSng(expression)
CStr(expression)

Bonjour,

As-tu testé la fonction TypeOf(LaVariable) ?

Boànjour Pc75;

TypeOf ? pour une variant ? et avec cette syntaxe ? Euh....

Tu ne confondrais pas avec VarType ?...:lol:

Bonne continuation

Edit :
Et l'approximation ne sera jamais totalement bonne. La preuve :

Code:

---

1 2 3 4 5

Private Sub Command1_Click() Dim mavar As Variant mavar = 3.1 MsgBox VarType(mavar) & " = " & TypeName(mavar) End Sub

---

Il vaut mieux utiliser un selectCase et la série des IsNumeric, Is...., Is.... puis tester à l'intérieur de chaque Case la conversion possible la plus proche

Bonsoir,
Pour confirmer la réponse de UcFoutu, le type de variable renvoyé par un 'Variant est fonction de ce qu'il contient.
S'il contient 'UnTexte' il renvoi Text
s'il contient '3.1' il renvoi Nombre avec virgule
etc...
A+