' Collection of code snippets by Arne Vajhøj ' posted to eksperten.dk, usenet and other places (2002-now) Imports System Imports System.Threading Public Class T Public Sub Run() Console.WriteLine("T Run") End Sub End Class Module Main Public Sub Run() Console.WriteLine("Run") End Sub Sub Main() Dim thr As T = new T Call (New Thread(New ThreadStart(AddressOf thr.Run))).Start Call (New Thread(AddressOf thr.Run)).Start Call (New Thread(New ThreadStart(AddressOf Run))).Start Call (New Thread(AddressOf Run)).Start End Sub End Module