31-05-21, 01:41 AM
ضع 2 تايمر
بحيث الاول مضبوط على 5 دقايق
والثاني على 10 دقايق
وكل واحد منهم يوقف نفسه ويشغل الاخر
مثال
Private Sub Form1_Load(ByVal sender As Object, ByVal e As EventArgs) Handles MyBase.Load
Timer1.Interval = 300000
Timer2.Interval = 600000
End Sub
Private Sub Timer1_Tick(ByVal sender As Object, ByVal e As EventArgs) Handles Timer1.Tick
Timer1.Stop()
Timer2.Start()
End Sub
Private Sub Timer2_Tick(ByVal sender As Object, ByVal e As EventArgs) Handles Timer2.Tick
Timer2.Stop()
Timer1.Start()
End Sub
بحيث الاول مضبوط على 5 دقايق
والثاني على 10 دقايق
وكل واحد منهم يوقف نفسه ويشغل الاخر
مثال
Private Sub Form1_Load(ByVal sender As Object, ByVal e As EventArgs) Handles MyBase.Load
Timer1.Interval = 300000
Timer2.Interval = 600000
End Sub
Private Sub Timer1_Tick(ByVal sender As Object, ByVal e As EventArgs) Handles Timer1.Tick
Timer1.Stop()
Timer2.Start()
End Sub
Private Sub Timer2_Tick(ByVal sender As Object, ByVal e As EventArgs) Handles Timer2.Tick
Timer2.Stop()
Timer1.Start()
End Sub
