Visual Basic,VB.netでのメインウィンドウの取得

Question

お世話になります。
Visual Basicを使い、vb.netで開発をしているものです。
職業プログラマーですが、二ヶ月目の新米です。
今回はVBでわからないことがあり、質問させていただきました。

言語：Visual Basic(WPF)

目的：mainwindowのインスタンス化されたフォーム（コントロール上に張り付けたラベルオブジェクト）を外部クラスから操作する

手段：Me.mainwindowを変数で参照してラベルオブジェクトのコンテンツに値を入れようととする
リンク内容
こちらを参考にして、メインウィンドウを取得しようとしましたが、できません。

問題：label1（mainwindowにはりつけたラベルオブジェクト）はSystem.windows.windowsのメンバーですとでる

この件ではもう一週間も詰まっています。
以下にソースを記述します。
何卒よろしくお願いします。

Public Class Class1

Dim mainWindow As Window = Me.mainWindow

Sub control()
    mainWindow.label1.content = "aaa"
↑ここでlabel1はSystem.windows.windowsのメンバーとでる
End Sub

End Class

Comments

[Tak1wa]

Label1という名前でアクセスしたいのですか？

Answer 1

こんにちは。

名前から取得したい場合は以下のような感じでしょうか。（mainWindow自体のインスタンスは取得済みという前提です。）

Dim targetLabel As Label = TryCast(mainWindow.FindName("label1"), Label)
If targetLabel IsNot Nothing Then
    targetLabel.Content = "aaa"
End If

---

ちなみに便宜上以下のようにMainWindowからHogeクラスを生成しました。

Class MainWindow 
    Private Sub Button_Click(sender As Object, e As RoutedEventArgs)
        Dim hoge As New Hoge(Me)
        hoge.SetLabel()
    End Sub
End Class

Class Hoge
    Dim mainWindow As Window
    Public Sub New(own As MainWindow)
        Me.mainWindow = own
    End Sub

    Public Sub SetLabel()
        Dim targetLabel As Label = TryCast(mainWindow.FindName("label1"), Label)
        If targetLabel IsNot Nothing Then
            targetLabel.Content = "aaa"
        End If
    End Sub
End Class

Comments

[Dra]

ありがとうございます。今から試してみます。
昼休み中に間に合わなければ就業時間以降にでも必ず試してみます。

[Dra]

できましたあああああああああああああああああああああああああああ
ありがとうございます！！！！！