Private Sub Timer1_Timer()
TimerLbl.Caption = Format(Time - memTime, "hh:mm:ss")
End Sub

I need seconds and tenths of seconds. How? Which value to set Timer.Interval

Since the program long stays in the loop, I do not implanted DoEvents because of the speed, the time often stands. Is it possible to somehow achieve that displays the time and it does not affect the speed of the program?