Поделиться через


Событие завершения

Происходит, когда все ссылки на экземпляр объекта удаляются из памяти путем установки для всех переменных, ссылающихся на объект, значение Nothing или когда последняя ссылка на объект выходит из область.

Синтаксис

Частныйобъект Sub_Terminate( )

Заполнитель объекта представляет выражение объекта , которое вычисляет объект в списке Применимо к .

Замечания

Событие Terminate возникает после выгрузки объекта. Событие Terminate не активируется, если экземпляры UserForm или класса удаляются из памяти из-за ненормального завершения работы приложения.

Например, если приложение вызывает оператор End перед удалением из памяти всех существующих экземпляров класса или UserForm , событие Terminate не активируется для этого класса или UserForm.

Пример

В результате выполнения следующих процедур обработки событий пользовательской формы компьютер издает звуковые сигналы в течение нескольких секунд после того как пользователь щелкает в клиентской области для закрытия формы.

Private Sub UserForm_Activate()
    UserForm1.Caption = "Click me to kill me!"
End Sub

Private Sub UserForm_Click()
  Unload Me
End Sub

Private Sub UserForm_Terminate()
    Dim Count As Integer
    For Count = 1 To 100
        Beep
    Next
End Sub

См. также

Поддержка и обратная связь

Есть вопросы или отзывы, касающиеся Office VBA или этой статьи? Руководство по другим способам получения поддержки и отправки отзывов см. в статье Поддержка Office VBA и обратная связь.