Съдържание

# Операция Is

Проверява дали две променливи на Basic сочат към един и същ екземпляр на обект.

### Синтаксис:

result = oObj1 Is oObj2

Ако oObj1 и oObj2 са псевдоними на един и същ екземпляр на обект, резултатът ще бъде True.

### Пример:

В долния пример първо се дефинира новият тип Student. Извикването на TestObjects създава обекта oStudent1 като нов обект от този тип.

Присвояването oStudent2 = oStudent1 всъщност създава псевдоним на същия обект. Затова резултатът от прилагането на операцията 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

В следващия пример резултатът е False, защото oStudent1 и oStudent2 сочат към два различни екземпляра на обект, всеки от тях – създаден с операцията New.

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

Теми, свързани с показаната

Функция EqualUnoObjects

Функция IsObject

Оператор Type