TimerInterval 属性

expandtri全部显示

使用 TimerInterval 属性可以以毫秒为单位在窗体的 Timer 事件之间指定一个时间间隔。Long 型,可读写。

expression.TimerInterval

expression     必需。返回“应用于”列表中的一个对象的表达式。

说明

TimerInterval 属性设置为一个 Long Integer 值,在 0 和 2,147,483,647 之间。

可以使用窗体的属性表Visual Basic 来设置该属性。

注释  在使用 Visual Basic 时,必须在窗体的 Load 事件中设置 TimerInterval 属性。

如果要以 TimerInterval 属性设置的间隔来运行 Visual Basic 代码,只需将代码放在窗体的 Timer 事件过程中即可。例如若要每三十秒重新查询一次记录,可将重新查询的代码放在窗体的 Timer 事件过程中,然后将 TimerInterval 属性设为 30000。

示例

下面的示例演示如何通过在按钮上显示和隐藏图标来建立一个闪烁按钮。窗体的 Load 事件过程将窗体的 TimerInterval 属性设置为 1000,这样图标显示便每隔一秒切换一次。

Sub Form_Load()

    Me.TimerInterval = 1000

End Sub

Sub Form_Timer()

    Static intShowPicture As Integer

    If intShowPicture Then

        ' Show icon.

        Me!btnPicture.Picture = "C:\Icons\Flash.ico"

    Else

        ' Don't show icon.

        Me!btnPicture.Picture = ""

    End If

    intShowPicture = Not intShowPicture

End Sub