Form_Load（VB6）で終了処理
VB6を使っています。
Form_Loadでフォルダチェックをして無ければメッセージボックスを
表示してEndしています。
現象は、メッセージボックスは表示されるのですが、終了しません。
ソースでは終了するのですが、実行ファイルでは終了せず、ボタンを
クリックしても何の反応もしません。
ControlBox=Falseにしているので、×がない状態です。
こういう現象になったことのある人いらっしゃいませんか？
メッセージボックスの表示後終了させたいと思っています。
何かEndがスルーされているような気がします。
ちなみにエラーハンドリングをForm_Load時にかけてますが、
その飛び先（ラベル）でもEndをやっています。
そーゆーのはFormのLoadイベントじゃなくてSub Main使ってやれ。
Sub Mainでやっても同じでした。
なぜスルーするのでしょうか？
Endがスルーされる、というより、Endで強制終了かけた時に解放されない
オブジェクト等がメモリに残って終了できない、という状況のように思えます。
基本的に、Endはいろんな不具合を引き起こしますので、
禁止と言いたいほどお勧めしません。
Sub Mainから起動する場合、「Exit Sub」でプログラムを終了できます。
終了できない場合は確保したメモリ領域の解放を失念しているはずですので、
そちらの調査を行ってみる必要があるのではないでしょうか。
# Sub Main は記述したけどスタートアップがForm1のままだった、
# なんてオチの可能性もあります。
そもそも、『End を使わなければならない状況』の方が稀なので、
さるべーじさんが書かれていますように、End は使うべきでは無いかと。
Sub Main から起動させる場合には、Sub Main が終了し、かつ、
すべてのフォームがアンロードされれば、アプリは終了するはずなので。
(ActiveX のプロジェクトの場合は、この限りでは無いですが)
> Sub Mainでやっても同じでした。
この部分が、どのようなコードになっているのか気になります。
その Sub Main プロシージャは、
・条件を満たさない時は、そもそも Form1 にアクセスしない。
・条件を満たした場合のみ、Form1 をロードさせる。
というコードになっていますでしょうか。
もし、Sub Main から起動しつつも、条件判定のコード等が
フォーム側に含まれているのであれば、その部分を見直す必要があります。
> 何かEndがスルーされているような気がします。
そもそも、End の部分に到達していなかった、という可能性は無いでしょうか?
| ツイート |  |