判斷2個對象變量釋放指向同一對象的方法是使用Is操作符，代碼如下：

Ifobj1Isobj2Then...

但當2個對象是同一類型時，或者指向同一個二級接口時，我們就可以利用ObjPtr（）函數對代碼進行一些優化處理：

IfObjPtr(obj1)=ObjPtr(obj2)Then...

后者的執行速度將比前種方法快40多。但是請注意，2種方法原本就是很有效率的，只有在時間要求非常嚴格的上百成千次的循環中，才會體現出這種差別。