if I were you this is what I would do: make 10 timers with a interval of 60000
and set enabled to false (to every timer but timer 1)
Code:Private Sub Timer1_Timer() Timer2.Enabled = True Timer1.Enabled = False End Sub Private Sub Timer10_Timer() 'your code here Timer10.Enabled = False End Sub Private Sub Timer2_Timer() Timer3.Enabled = True Timer2.Enabled = False End Sub Private Sub Timer3_Timer() Timer4.Enabled = True Timer3.Enabled = False End Sub Private Sub Timer4_Timer() Timer5.Enabled = True Timer4.Enabled = False End Sub Private Sub Timer5_Timer() Timer6.Enabled = True Timer5.Enabled = False End Sub Private Sub Timer6_Timer() Timer7.Enabled = True Timer6.Enabled = False End Sub Private Sub Timer7_Timer() Timer8.Enabled = True Timer7.Enabled = False End Sub Private Sub Timer8_Timer() Timer9.Enabled = True Timer8.Enabled = False End Sub Private Sub Timer9_Timer() Timer10.Enabled = True Timer9.Enabled = False End Sub




Reply With Quote