Wie kann ich Ereignisse in bestimmten Zeitabständen regelmäßig auftreten lassen? Wozu kann ich das Ereignis Timer einsetzen?

Dieser Code lässt ein Bild blinken

Private Sub Form_Load()
Me.TimerInterval = 1000
End Sub
Private Sub Form_Timer()
Static blnShowPicture As Boolean
If blnShowPicture Then 
cmdMyButton.Picture = "C:\Icons\Flash.ico"
Else cmdMyButton.Picture = "" 
End If blnShowPicture= Not blnShowPicture
End Sub

Man kann das Ereignis Timer in regelmäßigen Zeitabständen auftreten lassen. Dazu wird die Eigenschaft Zeitgeberintervall (TimerInterval) des Formulars im Eigenschaftenfenster oder über ein Programm auf einen Wert ungleich 0 gesetzt. Der Wert legt das Intervall in Millisekunden fest, in denen das Timer-Ereignis auftritt.