Timer interval : Timer « GUI « VB.Net Tutorial

Timer interval
imports System
imports System.Drawing
imports System.Windows.Forms

public class Timers : inherits Form

  dim lblTime as Label

  public sub New()
    Size = new Size(300,100)

    lblTime = new Label()
    lblTime.Parent = me
    lblTime.Size = new Size(200, 25)
    lblTime.Location = new Point(20,20)
    lblTime.BorderStyle = BorderStyle.FixedSingle
    lblTime.TextAlign = ContentAlignment.MiddleCenter

    dim t as new Timer()
    t.Interval = 100
    AddHandler t.Tick, AddressOf t_Tick
  end sub

  public shared sub Main() 
    Application.Run(new Timers())
  end sub

  private sub t_Tick(ByVal sender as object,ByVal e as EventArgs)
    lblTime.Text = DateTime.Now.ToString("dddd, MMMM d, yyyy  h:mm:ss tt")
  end sub
end class

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