VB.NETの他のフォームでスレッドのlabel.textを変更する方法

Question

私は2つのフォームを持つプロジェクトを持っています。 Form1とform2。 Form1のコードについては

は次のとおりです。Form2ので

Public Class Form1 
Dim thread As System.Threading.Thread 

Private Sub Form1_Load(sender As Object, e As EventArgs) Handles MyBase.Load 
    Form2.Show() 
End Sub 

Private Sub countup(ByVal startFrom As Integer) 
    For startFrom = startFrom To startFrom + 10000 
     startFrom += 1 
     Form2.Label1.Text = startFrom 
    Next 
End Sub 

Private Sub Button1_Click(sender As Object, e As EventArgs) Handles Button1.Click 
    thread = New System.Threading.Thread(AddressOf countup) 
    thread.Start(1000) 
End Sub 

Private Sub Button3_Click(sender As Object, e As EventArgs) Handles Button3.Click 
    thread.Abort() 
End Sub 
End Class 

私はLABEL1という名前のラベルのみ。 私はForm1で開始されたスレッドからForm2のlabel1.textを更新する必要があります。 プログラムはエラーなく実行されますが、何も起こりません。 form2のLabel1.textは変更されません。 これを行う方法は？事前に おかげ

Answer 1

ソリューション：

Invoke(Sub() 
      Form2.Label1.Text = startFrom 
     End Sub)