フォームの終了 (ID:88901)

名前

ホームページ(ブログ、Twitterなど)のURL (省略可)

本文 お世話になります。フォーム1からフォーム3を呼び出してフォーム1に戻るのは 下記のコードでＯＫです。 Unload Form3 Set Form3 Nothing Form1.Enabled = true Form1.SetFocus ・・・・・・ (1) フォーム3でコントロールボックスの『Ｘ』を押したら、フォーム1、フォーム3の全て終了したいので、下記を追加しました。 Private Sub Form_QueryUnload(Cancel As Integer, UnloadMode As Integer) Unload Form3 Set Form3 = Nothing Form1.Enabled = True Form1.SetFocus Unload Form1 Set Form1 = Nothing End Sub フォーム3で『Ｘ』を押すと (1）の個所がエラーで黄色になり、 実行時エラー'5'、 プロシージャーの呼び出し、または引数が不正です のエラーメッセージが表示されます。 何か良い解決方法を教えてください。 宜しくお願いします。