Set up an event handler for the Timer.Elapsed event, creates a timer, and starts the timer : Timer « GUI « VB.Net Tutorial

1. VB.Net Tutorial
2. GUI
3. Timer

Imports System
Imports System.Timers

Public Class Timer1

    Private Shared aTimer As System.Timers.Timer

    Public Shared Sub Main()
        aTimer = New System.Timers.Timer(10000)
        AddHandler aTimer.Elapsed, AddressOf OnTimedEvent
        aTimer.Interval = 2000
        aTimer.Enabled = True

        Console.WriteLine("Press the Enter key to exit the program.")
        Console.ReadLine()
        'GC.KeepAlive(aTimer)
    End Sub
    Private Shared Sub OnTimedEvent(source As Object, e As ElapsedEventArgs)
        Console.WriteLine("The Elapsed event was raised at {0}", e.SignalTime)
    End Sub
End Class

14.90.Timer
	14.90.1.	Timer interval
	14.90.2.	Use Timer to refresh Label
	14.90.3.	Timer event
	14.90.4.	Timer Start and Stop
	14.90.5.	Scrolling Text by Timer
	14.90.6.	Use three timers
	14.90.7.	Set up an event handler for the Timer.Elapsed event, creates a timer, and starts the timer