Access VBA教程:TimerInterval属性

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

expression.TimerInterval

expression   必需。返回“Applies To”列表中的一个对象的表达式。

说明

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

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

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

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

VBA示例

下面的示例演示如何通过在按钮上显示和隐藏图标来建立一个闪烁按钮。窗体的 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

上页:Access VBA教程:TextToDisplay属性 下页:Access VBA教程:Toolbar属性

Access VBA教程:TimerInterval属性

Access VBA教程:Toolbar属性 Access VBA教程:Top属性
Access VBA教程:TopMargin属性 Access VBA教程:TopValues属性
Access VBA教程:Transparent属性 Access VBA教程:TripleState属性
Access VBA教程:Type属性 Access VBA教程:UnderlineHyperlinks属性
Access VBA教程:UndoBatchEdit属性 Access VBA教程:UniqueRecords属性
Access VBA教程:UniqueTable属性 Access VBA教程:UniqueValues属性
Access VBA教程:UpdateOptions属性 Access VBA教程:UseDefaultPrinter属性
Access VBA教程:UseLongFileNames属性 Access VBA教程:UserControl属性
Access VBA教程:UseTransaction属性 Access VBA教程:ValidationRule属性
Access VBA教程:ValidationText属性 Access VBA教程:Value属性
版权所有 © 中山市飞娥软件工作室 证书:粤ICP备09170368号