Mega Code Archive

 

Categories / VB.Net / Thread

 

Start a Thread

Imports System Imports System.Drawing Imports System.Threading Imports System.Windows.Forms Imports System.IO public class MainClass    Shared Sub Main()         Dim Thrd As Thread         Dim TStart As New ThreadStart(AddressOf BusyThread)         Thrd = New Thread(TStart)         Thrd.Priority = ThreadPriority.Highest         Thrd.Start()    End Sub    Shared Sub BusyThread()         While True             Console.WriteLine("in thread")         End While     End Sub End Class