Salut

Je dois faire un calcul de temps et transformer un nombre de seconde en Heure, minute seconde.

Selon mon code plus bas, j'arrive pas trop mal à mes fins sauf que le résultat test faux.
Pour une donnée de base de 383.56734311302 voic ce que j'obtiens : 0 H 6 m 24 s

On aura vite fait de remarquer que cela devrait donner 23 secondes.
Alors ma question est : comment faire pour que le modulo n'arrondisse pas (à suposer que c'est lui qui le fait) ?
Subsidiairement : comment je peux récupérer les milièmes pour les mettre à la suite ?

Code : Sélectionner tout - Visualiser dans une fenêtre à part
1
2
3
4
5
6
7
8
9
10
11
12
 
Dim hci, mci, sci As Integer
            hci = drResult.GetValue(3) / 3600
            Hc = hci & " H "
            mci = (drResult.GetValue(3) Mod 3600) / 60
            Mc = mci & " m "
            sci = ((drResult.GetValue(3) Mod 3600) Mod 60) / 1
            Sc = sci & " s "
            drowTemps = dtResu.NewRow
            drowTemps(0) = drResult.GetValue(3)
            drowTemps(1) = Hc & Mc & Sc
            dtResu.Rows.Add(drowTemps)
Merci pour votre aide