Почему не работает - Sub timer1_timer() sec=sec+1 label1.caption=str(sec) end sub - VB

Формулировка задачи:

Почему не работает следующее

                    Листинг программы
                
Sub timer1_timer()
sec=sec+1
label1.caption=str(sec)
end sub

interval у таймер 1000 через секунду после запуска лаэбел пишет 1 ивсе таймер как-будто выключаеться

Решение задачи: «Почему не работает - Sub timer1_timer() sec=sec+1 label1.caption=str(sec) end sub»

textual
                            Листинг программы 
                        
Dim sec%
 
Private Sub timer1_timer()
sec = sec + 1
Label1.Caption = Str(sec)
End Sub

Оцени полезность:

9 голосов , оценка 4 из 5

Нужна аналогичная работа?

Оформи быстрый заказ и узнай стоимость

Похожие ответы