beregne alder

Noget a la:

SELECT YEAR(NOW())-YEAR(birthday)-IIF(DATEPART(DY,NOW())<DATEPART(DY,birthday),1,0) FROM yourtable

I)ndsæt denne i et modul:

Public Function Alderberegning(Dato As Date) As Integer
If DateSerial(Year(Date), Month(Dato), Day(Dato)) > Date Then
Alderberegning = DateDiff("yyyy", Dato, Date) - 1
Else
Alderberegning = DateDiff("yyyy", Dato, Date)
End If
End Function

Kald funktionen fra en forespørgsel med denne, hvor fødselsdag er dit datofelt:

Udtryk1: Alderberegning([fødselsdag])

Hej
Er ikke helt skrap til module.

Jeg har en Db med feltet Fødselsdag i datoform 01-01-2010

I formularen vil jeg god have at jeg kan se hvor gamle medlemmerne er. hvordan gøres det. hvordan skal forespørgslen se ud (resultatet skal kunne ses i et andet felt) og hvor skal udtryk Alderberegning stå.

Lars

Du opretter et ubundet tekstfelt i din formular
og skriver følgende
=Year(Date())-Year([fødselsdag])