Er Operator

Tester om to grunnleggende variabler refererer til samme objektforekomst.

result = oObj1 Is oObj2

Hvis oObj1 og oObj2 er referanser til samme objektforekomst, vil resultatet være Sann.

Eksemplet nedenfor definerer først en ny type Student. Å kalle TestObjects oppretter objektet oStudent1 som et nytt objekt av denne typen.

Oppgaven oStudent2 = oStudent1 kopierer faktisk referansen til det samme objektet. Derfor er resultatet av å bruke Is-operatoren 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
  

Eksemplet nedenfor returnerer False fordi oStudent1 og oStudent2 er referanser til to forskjellige objektforekomster, hver opprettet med New operatør.

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