Operator Is

Testet, ob zwei Basic-Variablen auf dieselbe Objektinstanz verweisen.

result = oObj1 Is oObj2

Wenn oObj1 und oObj2 Verweise auf dieselbe Objektinstanz sind, ist das Ergebnis True.

Das folgende Beispiel definiert zunächst einen neuen Typ Student. Der Aufruf von TestObjects erzeugt das Objekt oStudent1 als neues Objekt dieses Typs.

Die Zuweisung oStudent2 = oStudent1 kopiert tatsächlich die Referenz auf dasselbe Objekt. Daher ist das Ergebnis der Anwendung des Operators Is True.

Type Student
    FirstName as String
    Program as String
End Type

Sub TestObjects
    Dim oStudent1 as new Student
    Dim oStudent2 as Variant
    oStudent2 = oStudent1
    MsgBox Student1 Is Student2 ' True
End Sub

Das folgende Beispiel gibt False zurück, da oStudent1 und oStudent2 Verweise auf zwei verschiedene Objektinstanzen sind, die jeweils mit Operator New erstellt wurden.

Sub TestObjects_v2
    Dim oStudent1 as new Student
    Dim oStudent2 as new Student
    MsgBox oStudent1 Is oStudent2 ' False
End Sub