ok i have this :

Code:
 Sub Wait(ByVal wb)

        Do
            Threading.Thread.Sleep(500)
            Label1.Text = "Waiting..."
            Me.Refresh()

        Loop While wb.ReadyState < 4 Or Me.wb.IsBusy = True
End Sub
How do i make this run in a seperate thread ?