Imports System
Imports System.Threading
Public Module modmain
   Public Sub Main()
      'The KPD-Team 2001
      'URL: http://www.allapi.net/dotnet/
      'E-Mail: KPDTeam@Allapi.net
      Dim OtherClass as Second = new Second()
      Dim NewThread as Thread = new Thread(new ThreadStart(AddressOf OtherClass.Method))
      NewThread.Start()
   End Sub
End Module
Public Class Second
   Public Sub Method()
      Console.WriteLine("Second.Method is running in its own thread.")
   End Sub
End Class

Close this window