ISOBJECT |
Est-ce un objet ? |
|---|---|
| Visual Basic | |
Syntaxe
| Function IsObject(expression) As Boolean |
Paramètres
| Nom | Description |
|---|---|
| expression | Ce paramètre permet d'indiquer l'expression scalaire à vérifier. Le paramètre expression peut être n'importe quelle expression. |
Description
Cette fonction permet de vérifier qu'il s'agit d'un objet.
Remarques
- La fonction IsObject renvoie True si l'expression est une variable du sous-type Object ou un objet défini par l'utilisateur; sinon, il renvoie False.
- L'exemple suivant utilise la fonction IsObject pour déterminer si un identificateur représente une variable d'objet :
Dim MyInt, MyCheck, MyObject
Set MyObject = Me
MyCheck = IsObject(MyObject) ' Renvoie True.
MyCheck = IsObject(MyInt) 'Renvoie False.
Exemple
Voici un exemple d'une utilisation typique de cette fonction :
- Sub Main()
- Dim X
- Set Y = Nothing
- Set Z = CreateObject("CDO.Message")
- TableauNombre = Array(10,20,10,4,6,1,5)
- TableauChaine = Array("ABC","DEF","GHI","JKL")
- TableauMixed = Array(10,"A","B",5,"C","D",7)
- Chaine = "DEF"
- Nombre = 15
-
- MsgBox "X = " & IsObject(X) & vbCrLf & _
- "X = " & IsObject(Y) & vbCrLf & _
- "X = " & IsObject(Z) & vbCrLf & _
- "Date() = " & IsObject(Date()) & vbCrLf & _
- "TableauNombre = " & IsObject(TableauNombre) & vbCrLf & _
- "TableauChaine = " & IsObject(TableauChaine) & vbCrLf & _
- "TableauMixed = " & IsObject(TableauMixed) & vbCrLf & _
- "Chaine = " & IsObject(Chaine) & vbCrLf & _
- "Nombre = " & IsObject(Nombre) & vbCrLf & _
- "0 = " & IsObject(0) & vbCrLf & _
- "Null = " & IsObject(Null) & vbCrLf & _
- "Empty = " & IsObject(Empty) & vbCrLf & _
- "2000-01-01 = " & IsObject("2000-01-01") & vbCrLf & _
- "08-01-01 = " & IsObject("08-01-01") & vbCrLf & _
- "74-01-01 = " & IsObject("74-01-01") & vbCrLf & _
- "02-02-2001 = " & IsObject("02-02-2001") & vbCrLf & _
- "3/21/11 = " & IsObject("3/21/11")
- End Sub
on obtiendra le résultat suivant :
X = FauxX = Vrai
X = Vrai
Date() = Faux
TableauNombre = Faux
TableauChaine = Faux
TableauMixed = Faux
Chaine = Faux
Nombre = Faux
0 = Faux
Null = Faux
Empty = Faux
2000-01-01 = Faux
08-01-01 = Faux
74-01-01 = Faux
02-02-2001 = Faux
3/21/11 = Faux
Dernière mise à jour : Lundi, le 19 novembre 2012