ツールストリップメニュー項目には呼び出しメソッドがありません。バックグラウンドスレッドで更新する方法

Question

ツールストリップメニュー項目には呼び出しメソッドがありません。私は赤い波状の線を得る。代理人/呼び出しなしで更新するにはどうすればよいですか？

 Private Delegate Sub AppendTSMIDelegate(ByVal TMSI As ToolStripMenuItem, ByVal b As Boolean) 
Private Sub AppendTSMI(ByVal TSMI As ToolStripMenuItem, ByVal b As Boolean) 
    If **TSMI.InvokeRequired** Then 
     TSMI.Invoke(New AppendTSMIDelegate(AddressOf AppendTSMI), New Object() {TSMI, b}) 
    Else 
     'TSMI. 
    End If 

Answer 1

答えは、代わりにツールストリップの呼び出しステータスを確認することです。多くの考えと読書が私に答えを与えました！

 Private Sub AppendTSMI(ByVal TSMI As ToolStripMenuItem, ByVal b As Boolean) 

    Dim ST1 As StatusStrip = StatusStrip1 

    If ST1.InvokeRequired Then 
     ST1.Invoke(New AppendTSMIDelegate(AddressOf AppendTSMI), New Object() {TSMI, b}) 
    Else 
     TSMI.Checked = b 
    End If 

End Sub