www.ПЕРВЫЕ ШАГИ.ru :: Шаг 88 - Оператор Is

Используется для сравнения двух переменных, содержащих ссылки на объекты.

результат = объект1 Is объект2

Параметры
результат
Обязательный; любая числовая переменная.
объект1
Обязательный; любое имя объекта.
объект2
Обязательный; любое имя объекта.

Замечания
Если переменные объект1 и объект2 содержат ссылки на один объект, результат имеет значение True; в противном случае результат имеет значение False. Ссылки на один объект в двух переменных задаются различными способами.
В следующей инструкции в переменной A задается ссылка на тот же объект, что и в переменной B:

Set A = B

Следующая инструкция задает в переменных A и B ссылку на тот же объект, что и в переменной C:

Set A = C
Set B = C

Пример
В данном примере демонстрируется использование оператора Is для сравнения ссылок на объекты. Имена объектных переменных являются произвольными и используются только для демонстрации.

Dim MyObject, YourObject, ThisObject, OtherObject, ThatObject, MyCheck
Set YourObject = MyObject		' Определяет ссылки на объекты.
Set ThisObject = MyObject
Set ThatObject = OtherObject
MyCheck = YourObject Is ThisObject	' Возвращает True.
MyCheck = ThatObject Is ThisObject	' Возвращает False.
				' Пусть MyObject <> OtherObject
MyCheck = MyObject Is ThatObject	' Возвращает False.