CurrentComponentName
以字面 String 形式返回当前组件(模块或类)的名称。
语法:CurrentComponentName [ () ]
该值标识词汇上包含调用点的源单元——Module、Class、Form 或其他组件。
INFO
CurrentComponentName 是编译时内部函数:字面字符串在调用点嵌入到编译后的代码中。它在运行时不会改变,即使调用是通过转发或继承的成员到达的。
示例
vb
Public Sub Log(Message As String)
Debug.Print CurrentComponentName() & ": " & Message
End Sub