Применение
|
Объект Form |
Свойство TimerInterval (Интервал таймера) используется для задания интервала в миллисекундах между событиями Timer (Таймер) в форме. Возвращает доступное для чтения и записи значение типа Long.
выражение.TimerInterval
Выражение Обязательный. Выражение, возвращающее один из объектов в списке Применяется к.
Замечания
Значением свойства TimerInterval является длинное целое число от 0 до 2 147 483 647.
Это свойство можно задать с помощью страницы свойств формы, макроса или кода Visual Basic для приложений (VBA).
Примечание: При использовании VBA значение свойства TimerInterval задается с помощью события Load (Загрузка) формы.
Для выполнения кода VBA через промежутки времени, указанные свойством TimerInterval, поместите этот код в процедуру обработки события Timer (Таймер). Например, для повторного запроса записей через каждые 30 секунд поместите код для повторного запроса в процедуру обработки события Timer формы, а затем задайте для свойства TimerInterval значение 30 000.
Пример
В следующем примере показано, как создать мигающую кнопку в форме с помощью отображения и скрытия значка на кнопке. Процедура обработки события 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
