回答編集履歴
1
説明追記
test
CHANGED
|
@@ -12,13 +12,15 @@
|
|
|
12
12
|
|
|
13
13
|
---
|
|
14
14
|
|
|
15
|
-
Classの場合、参照が終わると自動的に解放されます。その時にTerminateイベントが呼び出されます。途中でErr.Raiseでエラーを発生させても同じです。
|
|
15
|
+
Classの場合、参照が終わると自動的に解放されます。その時にTerminateイベントが呼び出されます。途中でErr.Raiseでエラーを発生させても同じです。（エラー画面で終了させたり律せとしたらだめですが）
|
|
16
16
|
|
|
17
17
|
|
|
18
18
|
|
|
19
19
|
質問のコードでは、'With New Class1'でクラスを生成してますので、`End With` で参照が終了するのでそこでTerminateが呼び出されてClose処理も実行されます。もし、`On Error GoTo ・・・`でエラーハンドラに跳んでプロシージャを抜けた場合はその時点でClassが解放されてTerminateが実行されます。
|
|
20
20
|
|
|
21
21
|
下記のようにデバッグコードを埋め込んで動作を確認してみてはどうでしょうか。
|
|
22
|
+
|
|
23
|
+
|
|
22
24
|
|
|
23
25
|
|
|
24
26
|
|