.NET (Core and Framework)

Public Class Form1
    Inherits System.Windows.Forms.Form


     Dim t1 As System.Threading.Thread
     Dim t2 As System.Threading.Thread
     Dim t3 As System.Threading.Thread
     Dim t4 As System.Threading.Thread
     Dim t5 As System.Threading.Thread


#Region " Windows Form Designer generated code " 'This has been clipped out for brevity here


 Private Sub ThreadWorker()


  Do
   Debug.WriteLine("Thread Enter. [" & System.Threading.Thread.CurrentThread.Name & "]")
   System.Threading.Thread.CurrentThread.Sleep(1000)
   Debug.WriteLine("Thread exit [" & System.Threading.Thread.CurrentThread.Name & "]")


  Loop


 End Sub


 Private Sub cmdStart_Click(ByVal sender As Object, ByVal e As System.EventArgs) Handles cmdStart.Click


  t1 = New System.Threading.Thread(AddressOf ThreadWorker)
  t1.Name = "T1"
  t1.IsBackground = True
  t1.Start()


  t2 = New System.Threading.Thread(AddressOf ThreadWorker)
  t2.Name = "T2"
  t2.IsBackground = True
  t2.Start()


  t3 = New System.Threading.Thread(AddressOf ThreadWorker)
  t3.Name = "T3"
  t3.IsBackground = True
  t3.Start()


  t4 = New System.Threading.Thread(AddressOf ThreadWorker)
  t4.Name = "T4"
  t4.IsBackground = True
  t4.Start()


  t5 = New System.Threading.Thread(AddressOf ThreadWorker)
  t5.Name = "T5"
  t5.IsBackground = True
  t5.Start()


 End Sub


End Class