A voir également:
- Passage d'une textbox en heure et addition
- Addition excel - Guide
- Passage qwerty azerty - Guide
- Changement d'heure - Guide
- 35 go internet équivalent en heure - Forum Mobile
- Bash addition ✓ - Forum Shell
2 réponses
Il faut que tu fasse une fonction pour convertir le text "18:00" en un nombre entier (integer) de minutes (1080 minutes)
Puis tu ajoutes les 100 minutes (1180 minutes)
Puis tu reconverti le nombre en texte. un truc plus ou moins comme ça : Minutes / 60 pour le nombre d'heure et la formule du modulo pour avoir les minutes.
Bonne journée
Puis tu ajoutes les 100 minutes (1180 minutes)
Puis tu reconverti le nombre en texte. un truc plus ou moins comme ça : Minutes / 60 pour le nombre d'heure et la formule du modulo pour avoir les minutes.
Bonne journée
Bonjour et merci pour la réponse
En cherchant toute la matinée j'ai trouvé un moyen sachant que j'ai une windows form "temps" avec le temps à additionner :
.........
today = TextBox1.Text
Duration = New System.TimeSpan(0, 0, Temps.TextBox1.Text, 0)
answer = today.Add(Duration)
Label1.Text = Format(answer, "H:mm")
today = Label1.Text
Duration = New System.TimeSpan(0, 0, Temps.TextBox2.Text, 0)
answer = today.Add(Duration)
Label2.Text = Format(answer, "H:mm")
today = Label2.Text
Duration = New System.TimeSpan(0, 0, Temps.TextBox3.Text, 0)
answer = today.Add(Duration)
Label3.Text = Format(answer, "H:mm")
..........
Puis-je le faire sous forme de boucle ?
Exemple mais cela ne fonctionne pas :
for n = 1 to 3
temps1 = "Temps.TextBox" & n & ".Text"
labelBis = " Label" & n & ".Text"
Duration = New System.TimeSpan(0, 0, temps1, 0)
answer = today.Add(Duration)
labelBis = Format(answer, "H:mm")
next
cordialement
En cherchant toute la matinée j'ai trouvé un moyen sachant que j'ai une windows form "temps" avec le temps à additionner :
.........
today = TextBox1.Text
Duration = New System.TimeSpan(0, 0, Temps.TextBox1.Text, 0)
answer = today.Add(Duration)
Label1.Text = Format(answer, "H:mm")
today = Label1.Text
Duration = New System.TimeSpan(0, 0, Temps.TextBox2.Text, 0)
answer = today.Add(Duration)
Label2.Text = Format(answer, "H:mm")
today = Label2.Text
Duration = New System.TimeSpan(0, 0, Temps.TextBox3.Text, 0)
answer = today.Add(Duration)
Label3.Text = Format(answer, "H:mm")
..........
Puis-je le faire sous forme de boucle ?
Exemple mais cela ne fonctionne pas :
for n = 1 to 3
temps1 = "Temps.TextBox" & n & ".Text"
labelBis = " Label" & n & ".Text"
Duration = New System.TimeSpan(0, 0, temps1, 0)
answer = today.Add(Duration)
labelBis = Format(answer, "H:mm")
next
cordialement