我正在尝试从单独的线程上的单独类更新标签的文本。另一个类引发了一个在此处处理的事件
Private Sub handleChangeUI(ByVal sender As System.Object)
Dim ytde As Data_Entry_Form.YTD = CType(sender, Data_Entry_Form.YTD)
UpdateExcelLabel(ytde.LabelMessage)
End Sub
在 updateExcelLabel 方法中,我希望使用以下内容更改标签的文本
Private Delegate Sub updateExcelDelegate(txt As String)
Public Sub UpdateExcelLabel(text As String)
If Me.lblExcel.InvokeRequired = True Then
Dim del As New updateExcelDelegate(AddressOf UpdateExcelLabel)
Me.lblExcel.BeginInvoke(del, text)
Else
Me.lblExcel.Visible = True
Me.lblExcel.Text = text
Me.lblExcel.Refresh()
End If
End Sub
出于某种原因,Me.lblExcel.InvokeRequired 总是返回 true。在代表和多线程方面我仍然很新,所以任何帮助将不胜感激。