Visual Basic Scripting Edition | 语言参考 |
Terminate 事件在所关联的类的实例终止时发生此事件。 Private Sub Class_Terminate() 语句
End Sub
当类初始化时,statements 部分由零个或多个将要运行的代码语句组成。 说明下面的例子演示了 Terminate 事件的用法。 Class TestClass
Private Sub Class_Initialize ' 设置 Initialize 事件。
MsgBox("TestClass started") End Sub Private Sub Class_Terminate ' 设置 Terminate 事件。
MsgBox("TestClass terminated") End Sub End Class Set X =New TestClass ' 创建一个 TestClass 实例。
Set X =Nothing ' 删除实例。
要求版本 5 请参阅Class 对象 | Class 语句 | Initialize 事件 应用于:Class 对象 返回首页
|