Aplicável a
Objeto Form |
Você pode usar a propriedade TimerInterval para especificar o intervalo, em milissegundos, entre eventos Timer em um formulário. Longo de leitura/gravação.
expressão.TimerInterval
expressão Obrigatória. Uma expressão que retorna um dos objetos na lista Aplica-se a.
Comentários
A configuração da propriedade TimerInterval é um valor inteiro longo entre 0 e 2.147.483.647.
Você pode definir essa propriedade usando a folha de propriedades do formulário, uma macro ou o código do Visual Basic for Applications (VBA).
Observação: Ao usar o VBA, configure a propriedade TimerInterval no evento Load do formulário.
Para executar código do VBA em intervalos especificados pela propriedade TimerInterval, coloque o código no procedimento do evento Timer do formulário. Por exemplo, para refazer a consulta nos registros a cada 30 segundos, coloque o código para repetir a consulta nos registros no procedimento do evento Timer do formulário e defina a propriedade TimerInterval para 30000.
Exemplo
O exemplo a seguir mostra como criar um botão piscante em um formulário exibindo e ocultando um ícone no botão. O procedimento do evento Load do formulário define a propriedade TimerInterval do formulário para 1000 para que a exibição do ícone seja alternada a cada segundo.
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