Функция времени с таймером - VB

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

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

Есть программа простенькая, которая показывает системное время:
Но что делать если системное время не правильное? Как добавить к нему необходимое количество часов, минут, секунд?

Решение задачи: «Функция времени с таймером»

textual
Листинг программы
Private Sub Form_Load()
Timer1.Interval = 1000
Timer1.Enabled = True
End Sub
 
Private Sub Timer1_Timer()
Label1 = Time
Label2 = FormatDateTime(TimeSerial(Hour(Time) + 6, Minute(Time) - 15, Second(Time)), vbLongTime)
End Sub

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


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

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

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