É Operador

Verifica se duas variáveis Basic se referem à mesma instância de objeto.

result = oObj1 Is oObj2

Se oObj1 e oObj2 forem referências à mesma instância de objeto, o resultado será True.

O exemplo abaixo define, em primeiro lugar, um novo tipo Student. Ao chamar TestObjects, é criado o objeto oStudent1 como um novo objeto deste tipo.

A atribuição oStudent2 = oStudent1 copia, na verdade, a referência ao mesmo objeto. Por isso, o resultado da aplicação do operador 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
  

O exemplo abaixo devolve False porque oStudent1 e oStudent2 são referências a duas instâncias de objeto diferentes, cada uma criada com o operador New.

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