フォームの遷移について

環境/言語:[VB.NET]
分類:[.NET]

みなさん初めまして。JEEPと申します。

フォームの遷移について質問させて頂きます。

Ａ．フォーム１のボタンがクリックされたらフォーム１を消しフォーム２を表示させる。
Ｂ．フォーム２のボタンがクリックされたらフォーム２を消しフォーム１を表示させる。

ＡとＢを交互に行えるようにしたいというのが望みです。

フォーム１のボタンクリックイベントルーチンは

Private Sub Button_Click(略) Handles Button1.Click
Dim form2 As New form2(Me)
Me.AddOwnedForm(form2)
Me.Hide()
form2.ShowDialog(Me)
End Sub

こう書いています。

フォーム２のボタンクリックイベントルーチンは

Private Sub Button1_Click(略) Handles Button1.Click
Dim form1 As Form1
form1.Show()
Me.Dispose()
End Sub

こう書いています。

Ａ→Ｂは遷移するのですが、Ｂ→Ａで例外エラーが発生します。

過去ログを見てみましたが、私が抱えている問題があまりにも初歩的な問題で
あるせいか、載ってはいませんでした。

アドバイス頂ければ幸いです。よろしくお願い致します。

JEEPさんこんばんは。

まず、

> Private Sub Button1_Click(略) Handles Button1.Click
> Dim form1 As Form1
> form1.Show()
> Me.Dispose()
> End Sub

ここでエラーになるのは、
form1のインスタンスがないからです。
せっかく " Me.AddOwnedForm(form2) "で、
form2から使えるようにしてるのに... ^^;

それで、" form1.Show() "の前に、form1 = Me.Owner
とすれば、渡したform1のインスタンスをShowすることができますよ。

SHさん、返信ありがとうございます。

> それで、" form1.Show() "の前に、form1 = Me.Owner
> とすれば、渡したform1のインスタンスをShowすることができますよ。

できました！！！

てっきり

Dim form1 As Form1

の宣言だけでいいと思ってました。

勉強になりました、ありがとうございました。