vb.net的Timer控件

Timer(定時器)控件是用來產生一定的時間間隔。在每個時間間隔中都可根據應用程序的要求有相同或不同的事件或過程發生，Timer控件在工具箱中的圖標如圖所示：

1.設置Interval、Enabled屬性
Interval屬性是Timer控件最重要的屬性之一，它決定著事件或過程發生的時間間隔，Interval屬性以千分之一秒為基本單位，就是事件發生的最短間隔是一毫秒，但是這樣的時間間隔對系統的要求很高，因此按時間精度的要求適當設置這個屬性也是工程運行速度和可靠性的一種保證。
Enabled屬性可以設置timer控件是否為激活狀態，一旦這個屬性為False，那麼timer控件將失去作用。反之，如果在某個條件下將這個屬性設置為true，timer控件將會被激活，事件和過程將間隔發生。
2.timer的Tick事件
使用Tick事件時，可用此事件在每次timer控件時間間隔過去之後通知Visual Basic應該做什麼：Interval屬性指定Tick事件之間的間隔。無論何時，只要timer控件的Enabled屬性被設置為true，而且Interval屬性大於0，則Tick事件以Interval屬性指定的時間間隔發生。如下例將實現標題欄滾動的效果。其中Button1、Button2為按鈕，它們的Text屬性分別為“Go Now”和“Stop Here”；Label1為一個標簽，Text屬性為“Welcome to Vb.net”；Timer1為一個定時器控件，如下圖所示：

添加如下代碼：
Protected Sub Timer1_Tick(ByVal sender As Object,ByVal e As System.EventArgs)
    Label1.Left+=40
    Label1.Left=Label1.Left MOd Me.Width
End Sub

Protected Sub Button2_Click(Byval sender As Object,Byval As System.EventArgs)
    timer1.Enabled=False
End Sub

Protected Sub Button1_Click(Byval sender As Object,Byval e As System.EventArgs)
    timer1.Interval=100
    timer1.Enabled=True
End Sub

添加代碼後，運行該工程，點擊“Go Now”按鈕，即可看到標題欄在滾動，點擊“Stop Here”按鈕，則標題欄停止滾動。