SAVOIR SI ON A AFFAIRE A UNE HEURE

Bendes - 15 juil. 2001 à 22:15
cs_Warny Messages postés 473 Date d'inscription mercredi 7 août 2002 Statut Membre Dernière intervention 10 juin 2015 - 24 févr. 2003 à 12:06
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/1483-savoir-si-on-a-affaire-a-une-heure

cs_Warny Messages postés 473 Date d'inscription mercredi 7 août 2002 Statut Membre Dernière intervention 10 juin 2015
24 févr. 2003 à 12:06
Attention à tes déclaration. Dans ton prog sec et min sont des variants il faut écrire :
Dim sec as integer, min as integer, hr as integer

Pour le code, il est faut :
si tu fait
Dim dt as Date
dt = 1.5 'si ça marche
msgbox TestHeure (dt)
il te renverra vrai.
Il juste faut tester
dt < 1 and dt >= 0
isdate ne fait pas la différence entre une heure et une date donc quand tu utilises isdate() pour tester une heure, ca peut aussi être une date
Ou tu as la fonction IsDate :

IsDate("une date")
IsDate("une heure")
Rejoignez-nous