18-11-17, 08:33 PM
هذا مثال بعد وضع Interval للتايمر على 1000
Private Sub Timer1_Timer()
Static s
s = s + 1
If s = 10 Then
Command1_Click
s = 0
End If
End Sub
Private Sub Timer1_Timer()
Static s
s = s + 1
If s = 10 Then
Command1_Click
s = 0
End If
End Sub

