Vb Таймер

  • Автор темы aNOOBis
  • Дата начала
Статус
Закрыто для дальнейших ответов.
A

aNOOBis

Гость
#1
Private Sub Timer1_Timer()
Static sec
Static min

sec = sec + 1
lbls.Caption = sec
If sec > 59 Then sec = 0
If sec = 0 Then min = 1

lblm.Caption = min
End Sub

ничего не пойму! Когда занчение доходит до 59 оно переходит на 60 и сразу на 1. Почему оно не доходит до 59 после чего на 0?
 
T

Tanya

Гость
#2
возможно потому что порядок не тот,
то есть если поменять на следующий будет то, что тебе нужно:

Private Sub Timer1_Timer()
Static sec
Static min

sec = sec + 1
If sec > 59 Then sec = 0
lbls.Caption = sec

If sec = 0 Then min = 1

lblm.Caption = min
End Sub
 
Статус
Закрыто для дальнейших ответов.