53. MultiThreading
In this tutorial, we cover the concept of MultiThreading. Multi Threading allows an application to run different bits of code at the same time without causing your User Interface to become unresponsive. This tutorial will hopefully explain the concept of multithreading to you and we will continue with delegates in the next tutorial.
Code
Public Class Form1 Dim i As Integer Dim i2 As Integer Dim thread As System.Threading.Thread Dim thread2 As System.Threading.Thread Private Sub countup() Do Until i = 10000 i = i + 1 Label1.Text = i Me.Refresh() Loop End Sub Private Sub countup2() Do Until i2 = 10000 i2 = i2 + 1 Label2.Text = i2 Me.Refresh() Loop End Sub Private Sub Button1_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles Button1.Click thread = New System.Threading.Thread(AddressOf countup) thread.Start() End Sub Private Sub Button2_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles Button2.Click thread2 = New System.Threading.Thread(AddressOf countup2) thread2.Start() End Sub Private Sub Form1_Load(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles MyBase.Load Me.CheckForIllegalCrossThreadCalls = False End Sub End Class

