VB.netで別フォームを表示し元のフォームを非表示にするには?

ROY 2003-11-24 14:11:14 No: 110158

VB.netで検索フォームＡと結果表示フォームＢの二つのフォームがあったときに検索時には結果表示を表示せず、結果表示時には検索フォームを表示しないようにするにはどうすればうまくいくのでしょうか？
全くのど素人なので詳しく教えてください

ねろ URL 2003-11-24 23:04:00 No: 110159

２つのフォームを切り替えて表示すると言うことですね。
色々方法はあると思いますがいちばん簡単な方法は、
Form1をModuleでGlobalに宣言してForm2から見える
ようにする方法です。
Module Module1
Public Fom1 As Form1
End Module

Form1側はボタンが押されたらForm2を表示
Private Sub Button1_Click(ByVal sender As System.Object, _
    ByVal e As System.EventArgs) Handles Button1.Click
    Dim Fom2 As New Form2
    Fom1 = Me
    Me.Visible = False
    Fom2.Show()
End Sub

Form2側は
Private Sub Button1_Click(ByVal sender As System.Object, _
    ByVal e As System.EventArgs) Handles Button1.Click
    Fom1.Visible = True
    Me.Close()
End Sub
こんな感じになります。