Unload するとプログラムが終了してしまう

解決


化石老人  2004-04-15 18:00:51  No: 83028  IP: [192.*.*.*]

例えばForm1からForm3をShowで開いてからForm1に戻る際に  Unload.Form3  とやるとプログラムが終了してしまいます。(Form2はUnloadしてもOK)  今までにこういうことは無かったと思います。  仕方ないのでとりあえずVisible=Falseにしてごまかしていますが何日も悩んでいます。  どこか設定の違いでもあるのでしょうか?

編集 削除
nanashi  2004-04-15 18:11:38  No: 83029  IP: [192.*.*.*]

初めて聞く症状ですが、再現できるコードとかありますか?

編集 削除
kara  2004-04-16 13:29:54  No: 83030  IP: [192.*.*.*]

Form3のUnloadイベントのところに
Endが入ってるなんて事はありませんよね?

編集 削除
化石老人  2004-04-16 15:42:17  No: 83031  IP: [192.*.*.*]

レスをどうもありがとうございます。

コードはごく簡単で

Private Sub Command2_Click

   SaveEditData '-----ここでデータをセーブし
   fmJobSel.Visible=True '作業の選択メニューに戻り
   
   'Unload Me 'とやるとプログラムを終了してしまうので

編集 削除
化石老人  2004-04-16 15:46:58  No: 83032  IP: [192.*.*.*]

レスをどうもありがとうございます。

コードはごく簡単で

Private Sub Command2_Click

   SaveEditData '-----ここでデータをセーブし
   fmJobSel.Visible=True '作業の選択メニューに戻り(fmJobSelはUnloadしていない)
   
   'Unload Me 'とやるとプログラムを終了してしまうので
   'Unload fmEDIT 'と自分のオブジェクト名をフルネームで入れるが駄目で
   
   fmEDIT.Visible = False 'と入れて取り敢えず隠しています

End Sub

編集 削除
黒眼鏡  2004-04-16 17:10:29  No: 83033  IP: [192.*.*.*]

これだけならどう考えても現象は起こりませんね。

Form1で他フォームを呼び出す部分も載せた方がよいかと思います。
あと、Form3のUnload時に何か処理をしているとか。

Form3をUnloadする直前の時点でForm1がUnloadされているとか。

ブレークポイントとF8(ステップ実行)で
具体的にどの部分が落ちるのかを見てはどうでしょうか。

編集 削除
化石老人  2004-04-18 16:05:35  No: 83034  IP: [192.*.*.*]

皆様、黒眼鏡様、アドバイスをありがとうございました。(汗)
アドバイスでご指摘の方法で何と「QueryUnload」にEndが入っているのを発見しました。(入れた覚えはありませんでしたが)こんなことでSOSを発信して全く申し訳なく、また汗顔の至りであります。  まーとにかくこれで連日悩んだ問題が解決できましたのでお礼申し上げます。

編集 削除