Private Sub Class_Terminate()
	? Принудительная завершающая очистка и закрытие программы
	Me.Word.Quit False
End Sub

Поделитесь материалом с коллегами и друзьями