ロード時にエラーが発生した場合、閉じるには？ (ID:107356)

名前

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

本文 VisualBasic6.0を使用している初心者です。 フォームをShowで開いた後、そのフォームのロード時にエラーが発生 したので、ロードのところにエラー回避を入れ、Unlaod Meを追加した のですが、"既にアンロードされています"と、またエラーメッセージが でます。ロード時にエラーが発生した場合、そのShowで開いたフォームを 閉じるにはどうしたら良いのでしょうか？どうかお教え下さい。 Private Sub Command1_Click() Form1.Show End Sub (Form1) Private Sub Form_Load() On Error Goto ERROR1 C = 1 / 0 On Error GoTo 0 Exit Sub ERROR1: Unload Me End Sub