Question

How to create a countdown seconds timer in VB.NET

Answer 1

Imports System
Imports System.Threading

Public Class CountdownTimer_VB_NET
    Public Shared Sub CountdownTimer(ByVal seconds As Integer)
        Console.WriteLine("Total time: " & seconds & " seconds")

        While seconds > 0
            Thread.Sleep(1000)
            seconds -= 1
            Console.WriteLine("Time remaining: " & seconds & " seconds")
        End While
    End Sub

    Public Shared Sub Main(ByVal args As String())
        Dim sec As Integer = 5
		
        CountdownTimer(sec)
    End Sub
End Class



' run:
'
' Total time: 5 seconds
' Time remaining: 4 seconds
' Time remaining: 3 seconds
' Time remaining: 2 seconds
' Time remaining: 1 seconds
' Time remaining: 0 seconds
'

 

70+ SQL courses for beginners and professionals