Calculer l'age directement à partir de la date de naissance
swordjet19
Messages postés6Date d'inscriptionmardi 21 janvier 2003StatutMembreDernière intervention13 janvier 2006
-
13 janv. 2006 à 10:30
Renfield
Messages postés17287Date d'inscriptionmercredi 2 janvier 2002StatutModérateurDernière intervention27 septembre 2021
-
13 janv. 2006 à 18:19
Bonjour à tous,
Voilà j'ai un formulaire à developper, et je dois entrer les infos des
élèves d'un lycée. Donc j'ai un Textbox Date de naissance, je l'entrer
au format JJ/MM/AAAA, et j'aimerai que sur le texbox du dessous
apparaisse l'age calculé directement. Merci pour votre aide.
ScSami
Messages postés1488Date d'inscriptionmercredi 5 février 2003StatutMembreDernière intervention 3 décembre 200724 13 janv. 2006 à 15:27
des coups feux en l'air,
des feux d'artifices,
des cowgirls, des callgirls aussi ;-), des kdo, des ptites bulles de champ, wai, c'est vrai, a y réfléchir mieux, c'est pas si mal finalement
Enjoy
( Si une réponse vous convient, cliquez sur le bouton "Réponse acceptée". )
Renfield
Messages postés17287Date d'inscriptionmercredi 2 janvier 2002StatutModérateurDernière intervention27 septembre 202175 13 janv. 2006 à 18:19
d'ailleurs même :
Private Sub Txtdatenaiss_Change()
If IsDate ( Txtdatenaiss.Text ) Then
Txtage.Text = CStr ( int(datediff ( "D", cdate(Txtdatenaiss.Text), date) / 365.25) ) & " ans"
Else
Txtage.Text = VbNullString
End If
End Sub