RosettaCodeData/Task/Sleep/Visual-Basic-.NET/sleep.vb

9 lines
296 B
VB.net
Raw Permalink Normal View History

2023-07-01 11:58:00 -04:00
Module Program
Sub Main()
Dim millisecondsSleepTime = Integer.Parse(Console.ReadLine(), Globalization.CultureInfo.CurrentCulture)
Console.WriteLine("Sleeping...")
Threading.Thread.Sleep(millisecondsSleepTime)
Console.WriteLine("Awake!")
End Sub
End Module