CurrentComponentCLSID
以 String 形式返回当前类的 Class ID (CLSID)。
语法:CurrentComponentCLSID [ () ]
该值是由类的 [ClassId(...)] 属性分配给包含类的 GUID。如果未设置 ClassId,函数返回全零 GUID。
INFO
CurrentComponentCLSID 是编译时内部函数——CLSID 在源代码编译时从类的属性中读取,而非在运行时从 COM 注册表查找。它使用特殊的内部绑定,可能不像普通函数那样运作。
示例
vb
[ClassId("12345678-1234-1234-1234-123456789ABC")]
Class CFoo
Public Sub PrintId()
Debug.Print CurrentComponentCLSID()
End Sub
End Class