KB-32021: Convertendo segundos para o formato Time.

Descrição:

Como converter o valor de um contador em segundos para o formato de horas, minutos e segundos (por exemplo, converter 70 segundos para o formato 00h 01min 10seg)?

Solução:

Uma solução possível é através deste script:

dim H, M, S  // Variáveis String
dim ZH, ZM, ZS  // Variáveis Integer
dim Sec, Result
Sec = TagContSeg

ZH = Int(Sec / 3600)
ZM = Int(Sec / 60) – ZH * 60
ZS = Sec – (ZH * 3600 + ZM * 60)
H = Str(ZH)
M = Str(ZM)
S = Str(ZS)

Result = H + ‘:’ + M + ‘:’ + S
MessageBox(Result)

Print Friendly, PDF & Email

Este artigo foi útil? Was this helpful?

Classificação média - Average rating 5 / 5. Count: 2

Thoughts on “KB-32021: Convertendo segundos para o formato Time.

    1. Olá Claudio,
      Para mostrar o valor decrescente basta criar a seguinte expressão utilizando um tag Contador:
      “TagContador.Preset – TagContador.Value”.

      O contador deve estar com a propriedade CounterType = 0-Preset, enabled = false e com o valor desejado em segundos na propriedade Preset.

Leave a Reply

Your email address will not be published.Required fields are marked *