need help please

please can anybody help me with this line of code? i need to know eactly what the code is talking about.. its hard for me to know.. please i need explanation..

the code is displayed below:

  Private Shared Sub Main()
            Application.EnableVisualStyles
            Application.SetCompatibleTextRenderingDefault(False)
            Dim queue As New MyQueue(Of String)(&H100000)
            Dim queue2 As New MyQueue(Of PageEntry)(&H100000)
            Dim form As New Form1(queue, queue2)
            Dim craiglistArray As Craiglist() = New Craiglist(5  - 1) {}
            Dim threadArray As Thread() = New Thread(5  - 1) {}
            Dim i As Integer
            For i = 0 To 5 - 1
                craiglistArray(i) = New Craiglist
                craiglistArray(i).init(queue, queue2, form)
                threadArray(i) = New Thread(New ThreadStart(AddressOf craiglistArray(i).ExtractEmails))
                threadArray(i).Start
            Next i