'Visual Basic 2010 Debugging in Visual Studio Instrumenting Applications
Class Example1
    Public Shared Sub Main()
        Dim thread1 As New System.Threading.Thread(AddressOf Test)
        thread1.Name = "thread1"
        '
        Dim thread2 As New System.Threading.Thread(AddressOf Test)
        thread2.Name = "thread2"
        '
        thread1.Start(1)
        thread2.Start(2)
        '
        Console.ReadLine()
    End Sub
    Public Shared Sub Test(ByVal ID As Integer)
        Console.WriteLine("Test " & ID)                                    ' (1)
    End Sub
End Class
'Bezoek www.vbvoorbeelden.be voor meer Visual Basic voorbeelden.
'Copyright - De Wolf / vbvoorbeelden - 2003-2011 - Alle rechten voorbehouden.