Voila comment je procède pour mes programmes:

A l'enregistrement:
if not IsDate(txtDatedeNaissance) then
msgbox "Vous n'avez pas rentrez un champ valide pour votre date de naissance"
else
variable = clng(TxtDatedeNaissance)
end if

Pour voir l'enregistrement:

txtDatedeNaissance = CDate(variable)

Sinons tu peux aussi faire une petite fonction qui renvoi que les nombres, "." & "/" d'un paramettre.

Salut,
Un conseil pour les dates, transforme les en numérique, et quand tu doit les lires retransformer en date. Ainsi tu auras aucun problème de compatibilité avec les différentes langues des OS.