Необходимо сделать таймер с полосой - VB

Узнай цену своей работы

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

Ребят помогите нужно сделать таймер и линию в которой будет видно как он идет

Решение задачи: «Необходимо сделать таймер с полосой»

textual
Листинг программы
Private Sub Form_Load()
ProgressBar1.Scrolling = ccScrollingSmooth
ProgressBar2.Scrolling = ccScrollingSmooth
ProgressBar3.Scrolling = ccScrollingSmooth
ProgressBar1.Max = 23
ProgressBar2.Max = 59
ProgressBar3.Max = 59
Timer1.Interval = 1000
End Sub
 
Private Sub Timer1_Timer()
ProgressBar1.Value = Hour(Now)
ProgressBar2.Value = Minute(Now)
ProgressBar3.Value = Second(Now)
 
End Sub

ИИ поможет Вам:


  • решить любую задачу по программированию
  • объяснить код
  • расставить комментарии в коде
  • и т.д
Попробуйте бесплатно

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

7   голосов , оценка 3.571 из 5
Похожие ответы