【VB.net】フォーム間でのやり取りについて

質問

先日、同じような質問をさせて頂いたのですが、
解決に至らなかったため、もう少し質問内容を工夫しますので、再度質問させてください。

・実行したいプログラム

フォーム１のボタン１をクリックすると、フォーム２を開くと同時にフォーム２ボタン１がvisible=Trueになる。
フォーム１のボタン2をクリックすると、フォーム２を開くと同時にフォーム２のボタン１がvisible=Falseになり、ボタン２がvisible=Trueになる。

・書いたコード

----------------
Public Class Form1

Private Sub Button１_Click(sender As System.Object, e As System.EventArgs) Handles Button1.Click

Dim f As New Form2
f.Owner = Me
f.Show()

DirectCast(Me.Owner, Form2).Button1.Visible = True
DirectCast(Me.Owner, Form2).Button2.Visible = False

End Sub

Private Sub Button2_Click(sender As System.Object, e As System.EventArgs) Handles Button2.Click

Dim f As New Form2
f.Owner = Me
f.Show()

DirectCast(Me.Owner, Form2).Button1.Visible = False
DirectCast(Me.Owner, Form2).Button2.Visible = True

End Sub

End class
----------------

・問題点

「nullreferenceexceptionはハンドルされませんでした
オブジェクト参照がオブジェクト インスタンスに設定されていません。」

というエラーが発生します。
「DirectCast(Me.Owner, Form2).Button1.Visible = True」の部分のエラーです。

手書きで申し訳ありませんが、書きたいプログラムの参考画像も載せておきます。

数日前より調べては試し調べては試しと試行錯誤していますが、
正直手詰まりになっており、非常に困っております。
この他にも、フォーム間で命令を出しあいたい場面が多々あるのですが、
プロパティを変える程度のコードでつまずいていて、先に進めません。

手直しした簡単なサンプルコードを書いて頂けると非常に助かります。
以上、何卒よろしくお願い致します。

回答No.1

uruz · ベストアンサー

ややこしく考えすぎです。
Dim f As New Form2
と、Form2をｆとしてインスタンスを作成したのだから
Form2にあるButtonはForm1から見ると
f.Button1
f.Button2
となります。

DirectCast(Me.Owner, Form2).Button1.Visible = True
DirectCast(Me.Owner, Form2).Button2.Visible = False
↓↓↓↓↓↓
f.Button1.Visible = True
f.Button2.Visible = False

お礼

ご回答ありがとうございます。
プログラムを入力してみたところ、正常に動作しました。

また、ご説明も大変分かりやすかったです。
本当にありがとうございました。