millisecondes en mm:ss Résolu

Question

Après plusieurs recherches infructueuses je m'en remets à vous.

Quelqu'un connait une formule qui permet de transformer des millisecondes en format mm:ss?  Parce que présentement je galère...

cboulas · Accepted Answer

Bhà il n'est pas faisable de transformer en Minutes et seconde, dans millisecondes sauf si le nombre de millisecondes atteigne 1000, vu qu' 1 ms = 0,001 s temps que tes millisecondes sont inférieures à 1000 tu n'aura que 0 minutes et 0 secondes.

Après il est tjs faisable de les convertir ou obtenir un format :
00:00.000 mais ce ne sont que des maths, les millisecondes vont de 0 à 999.

regarde le code suivant :


if abs(t/1000)=0 then
   msgbox "Temps : " & t & " Millisecondes"
else
   if abs(t/1000)/60 =0 then
      msgbox "Temps : " & abs(t/1000) & " Secondes"
   else
       msgbox "Temps : " & (abs(t/1000)/60) & " Minutes "
   end if
end if


ça doit pouvoir marcher

Chris...
Web : Firstruner - eMail :  [mailto:support@firstruner.com Support]

cs_rene38 · Answer

Bonjour
tu peux essayer : (ton nombre de millisecondes est dans la variable Millis As Long
Dim Minut As Integer, Second As Double, Resultat As String
Minut = Millis \ 60000
Second = Millis - 60 * Minut 
Resultat = Format$(Minut, "##") & ":" & CStr(Second)

Je n'ai pas MSDN sous la main et je ne me souviens plus s'il faut mettre "##" ou "00" pour avoir les minutes écrites correctement, c'est à dire 12:05,453 ou bien 02:25,789 ou encore 00:41,234

cs_rene38 · Answer

rectification :

Second = (Millis - 60000 * Minut) / 1000
ou bien
Second = (Millis Mod 60000) / 1000

jeffwow · Answer

Merci beaucoup les gars pour cet éclaircissement, ça fonctionne parfaitement.

Millisecondes en mm:ss

4 réponses

Discussions similaires