クロススレッドの問題？

Question

私はオンラインで検索していますが、私のエラーのために適切な修正を見つけることができません：Cross-thread operation not valid: Control 'Form1' accessed from a thread other than the thread it was created on.

私は私のサイズの変更をどのように呼び出すのですか？いくつかの時間を動作し、他は上記のコードをスロー

私のコードは次のとおりです。

'Handler to handle screen resizes! (Tablet being flipped etc...) 
Private Sub TouchRadio_Resize(sender As Object, e As EventArgs) Handles Me.Resize 
    Dim thread As New Thread(AddressOf resizescreen) 
    thread.Start() 
End Sub 

Public Sub resizescreen() 
    System.Threading.Thread.Sleep(1) 
    For index As Integer = 1 To 50000 
     If Screen.PrimaryScreen.Bounds.Width = (Screen.PrimaryScreen.Bounds.Width + 17) Then 
      Exit For 
     End If 
     Dim screenWidth As Integer = Screen.PrimaryScreen.Bounds.Width 
     screenWidth = (screenWidth + 17) 
     Dim screenHeight As Integer = Screen.PrimaryScreen.Bounds.Height 
     Me.Size = New System.Drawing.Size(screenWidth, screenHeight) 'Here it errors at 
     GeckoWebBrowser1.Size = New System.Drawing.Size(screenWidth, screenHeight) 
     Me.Location = New Point(0, 0) 
    Next 
End Sub 

Answer 1

あなたはこの小さなヘルパーを使用することができます。

Public Shared Sub InvokeIfRequired(c As Control, action As Action(Of Control)) 
    If c.InvokeRequired Then 
     c.Invoke(New Action(Sub() action(c))) 
    Else 
     action(c) 
    End If 
End Sub 

し、その中に自分のものを置く：

InvokeIfRequired(Me.Size, 
     Sub() 
      For index As Integer = 1 To 50000 
       If Screen.PrimaryScreen.Bounds.Width = (Screen.PrimaryScreen.Bounds.Width + 17) Then 
        Exit For 
       End If 
       Dim screenWidth As Integer = Screen.PrimaryScreen.Bounds.Width 
       screenWidth = (screenWidth + 17) 
       Dim screenHeight As Integer = Screen.PrimaryScreen.Bounds.Height 
       Me.Size = New System.Drawing.Size(screenWidth, screenHeight) 'Here it errors at 
       GeckoWebBrowser1.Size = New System.Drawing.Size(screenWidth, screenHeight) 
       Me.Location = New Point(0, 0) 
      Next 
     End Sub) 

この方法は、必要であれば、それが呼び出されます。

---

UPDATE

私はいくつかのコメントは非常に有用であることを、指摘したいと思います。 @djvはすばらしい拡張子を説明しており、@Visual Vincentが指摘しているように、できるだけ呼び出す必要はありません。