对象比较运算符 Is

🎯功能

用于比较两个对象引用变量是否指向同一个对象

📜语法

结果 = 对象1 Is 对象2

📥参数

参数	数据类型	解释
对象1	对象型	任意有效对象名
对象2	对象型	任意有效对象名

📤返回

布尔型, 如果两个对象都引用同一个对象, 则返回True, 否则返回False

💡示例

Set fs1 = CreateObject("Scripting.FileSystemObject")
Set fs2 = CreateObject("Scripting.FileSystemObject")
Set f = fs1

If f Is fs1 Then 
	TracePrint "相同对象"
Else 
	TracePrint "不同对象"
End If

If f Is fs2 Then 
	TracePrint "相同对象"
Else 
	TracePrint "不同对象"
End If

📘备注

无