ouderdom uitrekenen op huidige datum

[scarie]

Hier ben ik nog een keer,
Nu zou ik graag in een tekstvak de ouderdom van de in te schrijven persoon zien verschijnen. Deze persoon moet zijn geboortedatum opgeven en van daaruit zou ik dat willen berekenen. Ik heb al geprobeerd met DateDiff
maar ik maak ergens een syntaxisfout en ik vind ze niet.

Private Sub Geboortedatum_Exit(Cancel As Integer,)
me.datber = DateDiff("yyyy",now,Geboortedatum,,)
End Sub

datber is het textvak.

Dank bij voorbaat
Scarie

 

[Eugene]

Probeer het eens zonder de twee komma's achter geboortedatum.

me.datber = DateDiff("yyyy",now,Geboortedatum)

 

[vanzwam]

Geplaatst door Eugene
Probeer het eens zonder de twee komma's achter geboortedatum.

me.datber = DateDiff("yyyy",now,Geboortedatum)

Je moet wel de geboortedatum en now verwisselen,anders krijg je een negatief getal. Dus :

me.datber = DateDiff("yyyy",Geboortedatum,Now)

 

[scarie]

Hallo,
Bedankt voor jullie antwoorden, het kan zonder komma's en de data moesten omgedraaid worden

Scarie