发送或接受数组参数

发送

 Dim arguments() As String = {qqNumber, count.ToString}
ThreadQueueList.Add(arguments)

 BgWorker.RunWorkerAsync(ThreadQueueList(0))

 

 '* 接收传递过来的参数
            Dim qqNumber As String = DirectCast(e.Argument, String())(0)
            Dim listNumber As Integer = Integer.Parse(DirectCast(e.Argument, String())(1))