Sumário

# Operador Is

Testa se duas variáveis Basic se referem à mesma instância do objeto.

### Sintaxe:

result = oObj1 Is oObj2

Se oObj1 e oObj2 são referências para a mesma instância de objeto, o resultado será True.

### Exemplo:

O exemplo abaixo primeiramente define um novo tipo chamado Student. Chamar TestObjects cria o objeto oStudent1 como uma instância desse tipo.

A atribuição oStudent2 = oStudent1 copia a referência para o mesmo objeto. Assim, o resultado da aplicação do operador Is será 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 retorna False porque oStudent1 e oStudent2 são referências para dois objetos distintos, cada um criado separadamente com o operador New.

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

Tópicos relacionados

Função EqualUnoObjects

Função IsObject

Instrução Type