Visual Basic Scripting Edition | 語言參考 |
Terminate 事件在所關(guān)聯(lián)的類的實(shí)例終止時發(fā)生此事件。 Private Sub Class_Terminate() 語句
End Sub
當(dāng)類初始化時,statements 部分由零個或多個將要運(yùn)行的代碼語句組成。 說明下面的例子演示了 Terminate 事件的用法。 Class TestClass
Private Sub Class_Initialize ' 設(shè)置 Initialize 事件。
MsgBox("TestClass started") End Sub Private Sub Class_Terminate ' 設(shè)置 Terminate 事件。
MsgBox("TestClass terminated") End Sub End Class Set X =New TestClass ' 創(chuàng)建一個 TestClass 實(shí)例。
Set X =Nothing ' 刪除實(shí)例。
要求版本 5 請參閱Class 對象 | Class 語句 | Initialize 事件 應(yīng)用于:Class 對象 返回首頁
|