Imports System.Threading
Class Example
Shared Sub Main()
Dim interval As New TimeSpan(0, 0, 2)
Console.WriteLine("Sleep for 2 seconds.")
Thread.Sleep(interval)
Console.WriteLine("Main thread exits.")
End Sub
End Class