Как я могу заставить hh:mm:ss отображаться всего за несколько секунд в vb.net

Я попытался заставить vb.net отображать время работы, которое работало в формате чч: мм: сс. Я хочу, чтобы он отображался всего за несколько секунд. Могу ли я получить помощь? Так, например, если бы это было 10:00:00, то это было бы 10 * 60 * 60. Однако время автоматически продолжится, и если, скажем, время было 10:19:23, что мне делать?

Мой код:

Private Sub Timer1_Tick(sender As Object, e As EventArgs) Handles Timer1.Tick
    Label2.Text = Format(Now, "HH:mm:ss")
End Sub

Private Function GetSeconds(ByVal timestamp As DateTime) As Integer

    Dim timespan As TimeSpan = Now - timestamp
    Return (timespan.TotalSeconds)

End Function

date time vb.net seconds
person Karthik Nandula    schedule 12.11.2016    source источник

Ответы (1)


arrow_upward
3
arrow_downward

Вот несколько способов получить время суток в секундах:

Dim a As Double = Now.TimeOfDay.TotalSeconds          ' 39715.561210299995
Dim b As Long   = TimeOfDay.Ticks \ 10000000          ' 39715
Dim c As Double = TimeOfDay.ToOADate * 24 * 60 * 60   ' 39715.000000000007
Dim d As Double = (Now.ToOADate Mod 1) * 24 * 60 * 60 ' 39715.000000000007
person Slai    schedule 12.11.2016