Operator Is

Sprawdza, czy dwie zmienne Basic odnoszą się do tej samej instancji obiektu.

result = oObj1 Is oObj2

Jeśli oObj1 i oObj2 są odniesieniami do tej samej instancji obiektu, wynikiem będzie True.

Poniższy przykład najpierw definiuje nowy typ Student. Wywołanie TestObjects tworzy obiekt oStudent1 jako nowy obiekt tego typu.

Przypisanie oStudent2 = oStudent1 faktycznie kopiuje odwołanie do tego samego obiektu. Stąd wynikiem zastosowania operatora Is jest 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
  

Poniższy przykład zwraca wartość False, ponieważ oStudent1 i oStudent2 to odwołania do dwóch różnych instancji obiektów, z których każda została utworzona za pomocą operatora New.

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