返回布尔值的VB.NET委托函数

我正在使用BackgroundWorker，我需要使用委托函数查看是否选中ListViewItem，但我一直收到一个跨线程错误。这一定是我写的方式。有什么帮助吗

    Dim delListViewItemChecked As ListViewItemCheckedDelegate = AddressOf ListViewItemChecked
    delListViewItemChecked.Invoke(ListViewPhotos, 0)

Private Delegate Function ListViewItemCheckedDelegate(ByVal listView As ListView, ByVal index As Integer) As Boolean

Private Function ListViewItemChecked(ByVal listView As ListView, ByVal index As Integer) As Boolean
    If listView.Items(index).Checked = True Then
        Return True
    Else
        Return False
    End If
End Function

试试这个：

不要将listView作为参数传递给ListViewItemCheckedDelegate。 在后台工作人员的DoWork处理程序中声明一个新的委托实例。 此示例似乎工作正常：

Private Delegate Function ListViewItemCheckedDelegate(ByVal index As Integer) As Boolean

Private Function ListViewItemChecked(ByVal index As Integer) As Boolean
Return ListView1.Visible
End Function

Private Sub Button1_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles Button1.Click
bkg1.RunWorkerAsync()
End Sub

Private Sub bkg1_DoWork(ByVal sender As System.Object, ByVal e As System.ComponentModel.DoWorkEventArgs) Handles bkg1.DoWork
Dim delListViewItemChecked As New ListViewItemCheckedDelegate(AddressOf ListViewItemChecked)
MsgBox(Me.Invoke(delListViewItemChecked, 3)) ' arbitrary 3
End Sub

---

可能重复的不是重复的。vb.net和C是不同的语言。