Is (operator)
result = object1 Is object2
Description
Is returns a boolean specifying if one object reference is identical to another. The required components, object1 and object2 are two object references.
Example
Rem Is Example Dim Obj1,Obj2 Obj1 = Array("Lovelace","Hopper","Allen") Set Obj2 = Obj1 CompareObjects Obj1, Obj2 Set Obj2 = NOTHING CompareObjects Obj1, Obj2 missing=6 notmissing=7 CompareObjects missing, notmissing Sub CompareObjects(Ob1, Ob2)
If Ob1 IS Ob2 THEN Print "Same" Else Print "Different" End If
End Sub
Output
Same Different