Discussion :

[thierry007]

BOnjour a tout le monde

Je souhaiterais additionner des temps de prestations mais je suis un peut dans le brouillard. Si quelqu'un aurai une solution ou début de solution, ce serais sympa.
je dois additionner des temps en format ( 01:55 , 00:48 , 10:25 ) soit un total de 13:08 ( 13 heures et 08 minutes )

ou:

01h55
+00h48
+10h25
--------------
13h08

Bien merci d'avance

[Prisson]

Bonjour,
je crois que tu pourrais créer une liste et utiliser un do .... while ou bien until pour balayer additionner et formater le resultat final pour obtenir ce que tu desires.
je le dis comme cela mais je pense que cela devrait resoudre le pb.

[wallace1]

Bonjour,

En utilisant la classe TimeSpan :

Code :

Sélectionner tout - Visualiser dans une fenêtre à part

1
2
3
4
5
6
7
8
9
 
Dim tsResult As TimeSpan
Dim ts1 As New TimeSpan(1, 55, 0)
Dim ts2 As New TimeSpan(0, 48, 0)
Dim ts3 As New TimeSpan(10, 25, 0)
 
tsResult = ts1.Add(ts2).Add(ts3)
 
MsgBox(tsResult.ToString)

Pour les infos concernant le formatage de la chaîne c'est toujours sur MSDN ici : https://msdn.microsoft.com/fr-fr/lib...v=vs.110).aspx

A+

[Sehnsucht]

Juste un détail pour compléter la réponse de wallace1 :

La structure​ TimeSpan surcharge en plus l'opérateur (+) ce qui permet d'alléger l'écriture en : tsResult = ts1 + ts2 + ts3