VB2005(Timer控件)

 

定时器控件主要用来计时。通过计时处理，可以实现各种复杂的操作。例如：延时、动画等。

Timer控件的常用属性和事件

Timer控件的常用属性不是狠多，比较常用的是Interval（间隔）属性，该属性值决定两次调用Timer控件的间隔毫秒数。Enabled属性用来控制定时器控件是否有效，该控件运行时是不可见的。

定时器控件的属性虽然不多，但其在动画制作、定期执行某个操作等方面起着重要作用。

定时器控件的事件只有一个Tick。用户可以通过捕捉该事件来对事件进行操作。

Public Class Form12

    Dim filesave As Boolean

    Private Sub Form12_Load(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles MyBase.Load
        filesave = False
    End Sub

    Private Sub Timer1_Tick(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles Timer1.Tick
        Me.Timer1.Enabled = False
        If filesave = False Then
            MsgBox("文件没有存储，请及时存储！", MsgBoxStyle.OkOnly)
            filesave = True
        End If
        Me.Timer1.Enabled = True
    End Sub

    Private Sub TextBox1_TextChanged(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles TextBox1.TextChanged
        filesave = False
    End Sub
End Class