FONCTION POUR TROUVER L'HEURE À PARTIR D'UNE VALEUR (INTEGER)
bubble44
Messages postés
200
Date d'inscription
lundi 10 mars 2003
Statut
Membre
Dernière intervention
3 août 2004
-
23 juil. 2004 à 18:29
Olilefou Messages postés 29 Date d'inscription mercredi 1 août 2001 Statut Membre Dernière intervention 9 décembre 2005 - 24 juil. 2004 à 23:45
Olilefou Messages postés 29 Date d'inscription mercredi 1 août 2001 Statut Membre Dernière intervention 9 décembre 2005 - 24 juil. 2004 à 23:45
Cette discussion concerne un article du site. Pour la consulter dans son contexte d'origine, cliquez sur le lien ci-dessous.
https://codes-sources.commentcamarche.net/source/24801-fonction-pour-trouver-l-heure-a-partir-d-une-valeur-integer
https://codes-sources.commentcamarche.net/source/24801-fonction-pour-trouver-l-heure-a-partir-d-une-valeur-integer
24 juil. 2004 à 23:45
Private Function Fomat_Heure(Temps As Long) As String
Fomat_Heure = Right("00" & ((Temps \ 3600) Mod 60), 2) & ":" & _
Right("00" & ((Temps \ 60) Mod 60), 2) & ":" & Right("00" & (Temps Mod 60), 2)
End Function
Cette fonction s'utilise comme ca :
TextSortie.Text = Fomat_Heure(val(TextEntree.Text))
Bye.
23 juil. 2004 à 18:29
;-)