Public Function ConvertSecondsToHourMinSec(ByVal intTotalSeconds) As String
    Dim hours As String =INT(intTotalSeconds/3600)
    If Len(hours) < 2 Then
        hours = RIGHT(("0" & hours), 2)
    End If
    Dim mins As String = RIGHT("0" & INT((intTotalSeconds MOD 3600)/60), 2)
    Dim secs AS String = RIGHT("0" & ((intTotalSeconds MOD 3600) MOD 60), 2)

    ConvertSecondsToHourMinSec = hours & ":" & mins & ":" & secs

End Function

Public Function Parse(scs As Integer) As String 
    Return New TimeSpan(0, 0, scs).ToString("mm\:ss")
End Function

Public Function Parse(scs As Integer) As String
    Return New DateTime((New TimeSpan(0, 0, scs)).Ticks).ToString("mm:ss")
End Function

Return New DateTime((New TimeSpan(1000, 1000, 1000)).Ticks).ToString("mm:ss")

Return New DateTime((New TimeSpan(1000, 1000, 1000)).Ticks).ToString("mm:ss")

var time = new TimeSpan(1000, 1000, 1000);
string value = string.Format("{0}hr {1}mn {2}sec", (int)time.TotalHours,  time.Minutes, time.Seconds); // 1016hr 56mn 40sec

На сайте осуществляется обработка файлов cookie, необходимых для работы сайта, а также для анализа использования сайта и улучшения предоставляемых сервисов с использованием метрической программы Яндекс.Метрика.

Продолжая использовать сайт, вы даёте согласие на обработку файлов cookie, необходимых для работы сайта. Другие опции вы можете выбрать по своему усмотрению.

По нижеприведенным ссылкам мы можете ознакомиться с действующим на сайте пользовательским соглашением и политикой конфиденциальности.

Пользовательское соглашение
Политика конфиденциальности

	Необходимые cookie
	Cookie для сбора статистики
	Cookie для маркетинга и рекламы