使用带参数化函数的多线程传递对象数组作为参数

Question

我创建了一个如下结构

Public Structure Emu
  Dim a As Object
  Dim b As Object
  Dim c As Object
  Dim d As Object
End Structure

现在我已经声明了一个结构emu数组，如下所示

Public x(25) As Emu

现在我有一个名为goEMU的按钮，我在按钮的点击事件中添加了代码，如下所示：

Public Sub goEMU_Click(Sender As Object, e As EventArgs) Handles goEMU.click
    ******Some work 
    Set Index as cc based on some custom criteria
    DoMyJob(x(cc),y) 
    *****Some work 
End Sub 

在我的个性化子目录中，我有以下代码：

Sub DoMyJob(ByRef f As Emu, ByVal z As Integer)

****Do some work

End Sub

现在我想创建一个控制子DoMyJob的线程，线程将在goEMU_Click内开始。

我遇到的问题是我无法使用上述参数调用AddressOf DoMyJob。

任何帮助/建议都将受到高度赞赏。