Timer Event Code Stops After First Run

[burrina]

I have code that makes a label flash and then stops.It works ok but then the stay visible after that and then the code does not fire again when I change to another record and it should fire!

Here is my code:


If Me.nextschddte = Date Then

Static intCounter As Integer
intCounter = intCounter + 1
Me.lblLocked.Visible = Not Me.lblLocked.Visible
If intCounter >= 5 Then
Me.TimerInterval = 0
Me.lblLocked.Visible = True
intCounter = 0
End If

End If

[pbaldy]

You set the timer interval to 0, which stops it.

[burrina]

Yes, I want it to stop but then not show the label but upon moving to the next record fire again if possible!

[pbaldy]

So in the current event set the timer interval to something other than 0.