Champs valide si age superieur à 20
Bonjour,
salut, je travaille sur un formulaire access 2003 ou j'ai un champ date de naissance, ce que je cherche a faire c'est de saisir une date de naissance valide dans mon formulaire, une date de naissance est valide si et seulement si l'age de candidat depasse 20 ans sinon je veux un message d'erreur qui s'affiche et indique qu'il faut inserer une date valide
salut, je travaille sur un formulaire access 2003 ou j'ai un champ date de naissance, ce que je cherche a faire c'est de saisir une date de naissance valide dans mon formulaire, une date de naissance est valide si et seulement si l'age de candidat depasse 20 ans sinon je veux un message d'erreur qui s'affiche et indique qu'il faut inserer une date valide
1 réponse
-
bonjour,
Apres mise à jour de ta date de naissance, dans la procédure, tu met:if (date -[date de naissance])<20 then
msgbox"date non valide"
endif-
-
-
-
-
Domage pour moi ça marche pas voici exactement ce que j'ai ajouté comme VB:
Private Sub date_de_naissance_AfterUpdate()
If (Date - [date_de_naissance]) < 20 Then
MsgBox "date non valide"
End If
End Sub
ça marche pas aussi avec ce code:
Private Sub date_de_naissance_AfterUpdate()
If (Date() - [date_de_naissance]) < 20 Then
MsgBox "date non valide"
End If
End Sub
-
