Array
(
)

Função que retorna tempo no formato dd:hh:mm com uma entrada em segundos

Twitter/@caiouechi
   - 07 nov 2012

Boa tarde galera! acabei de fazer uma funçãozinha bacana que surgiu aqui no trabalho, dei uma procurada aqui no forum e
não achei... por isso estou mandando!
Se você tiver um tempo em segundos e quiser transformá-lo no formato dd:hh:mm , ai está!
Function retornaHorario(ByVal tempoEmSegundos As Decimal) As String
Dim _numeroQualquer As Decimal = tempoEmSegundos
Dim _numeroHoras As Decimal = 0
Dim _numeroMinutos As Decimal = 0
Dim _numeroSegundos As Decimal = 0
_numeroHoras = ((_numeroQualquer / 60) \ 60)
_numeroMinutos = ((_numeroQualquer - (_numeroHoras * 60 * 60)) \ 60)
_numeroSegundos = _numeroQualquer - (_numeroHoras * 60 * 60) - (_numeroMinutos * 60)
Return String.Format("{0}:{1}:{2}", _numeroHoras.ToString("00"), _numeroMinutos.ToString("00"), _numeroSegundos.ToString("00"))
End Function

Abraços!!

Robson Robsonalves.net
   - 07 nov 2012

Hahaha! Ficou Bom!!

Já tive que fazer alguns cálculos aqui de horas úteis trabalhada, no sistema do suporte.

Só que eu não precisava dos segundos, então fiquei na base dos minutos e trabalhei com o Resto da divisão (% ou Mod).
Pegando a hora e os minutos efetivamente!

Bom Trabalho!