Timer control *RESOLVED*

[Virus00110]

is there a way that you can make the timer control interval be set so that it can be longer then a minute something like 5 minutes or would it be easier to do it with API's?

[manavo11]

You can use a timer to count each minute. Something like this :

Dim i As Integer
 
Private Sub Form_Load()
 Timer1.Interval = 60000
 i = 0
End Sub
 
Private Sub Timer1_Timer()
 i = i + 1
 If i = 5 Then MsgBox "5 minutes have passed"
End Sub

[Virus00110]

Originally posted by manavo11
You can use a timer to count each minute. Something like this :

Dim i As Integer
 
Private Sub Form_Load()
 Timer1.Interval = 60000
 i = 0
End Sub
 
Private Sub Timer1_Timer()
 i = i + 1
 If i = 5 Then MsgBox "5 minutes have passed"
End Sub

thanks manavo11 that did the trick.

[manavo11]

Anytime