Resetting a timer in VB6

[rhino]

Hi Bruce,
Try disabling the Timer then set the interval to 0 and then set it back to whatever interval you want before enabling it again.

From this page on MSDN:


So if you first set the interval to 0 and then reset it to whatever it should do what you want, right?

/Henrik.

This method seems to work for me. Here's a quick test I used to verify. Set timer1 interval to 3000

Private Sub Command1_Click()
Timer1.Enabled = True
End Sub

Private Sub Command2_Click()
Label1.Caption = ""
End Sub

Private Sub Command3_Click()
Timer1.Enabled = False
Timer1.Interval = 0
Timer1.Interval = 3000
End Sub

Private Sub Timer1_Timer()
Label1.Caption = "DONE"
End Sub

Good call Henrik!