Calculating Ages

Have been following recent thread on calculating ages. I have a Club
membership list, including a D.O.B. field. I wish to calculate the current
ages of the membership on a monthly basis, preferably to YY/MM/DD accuracy,
though YY/MM would suffice. I followed through to saving module, which I
believe I will have to edit (?), but got lost at the "Control Source" stage.
I found the field properties OK, but where do you find the "Control Source"
????
Many Thanks

On Tue, 17 Aug 2004 07:51:01 -0700, Graham wrote:

Have been following recent thread on calculating ages. I have a Club
membership list, including a D.O.B. field. I wish to calculate the current
ages of the membership on a monthly basis, preferably to YY/MM/DD accuracy,
though YY/MM would suffice. I followed through to saving module, which I
believe I will have to edit (?), but got lost at the "Control Source" stage.
I found the field properties OK, but where do you find the "Control Source"
????
Many Thanks


I have no idea what you have done up to this point.
There is no need for a module to do this,
So, let's start again.

If you wish to get a list of members ages, you can do it in a query or
on a form, or in a report.

In a query, include the members ID, Members Name, [DOB], etc., fields.
Then add a new column.
Age: DateDiff("yyyy", [DOB], Date()) - IIF(Format([DOB], "mmdd")
Format(Date(), "mmdd"), 1, 0)

If you wish to do this in a report instead, add an unbound text
control to the report. As the control source of this control, write:

=DateDiff("yyyy",[DOB],Date())-IIf(Format([DOB],"mmdd")Format(Date(),
"mmdd"),1,0)

You can find the control source property of any control by
right-clicking on the control (in design view) and then selecting
Properties. Click on the Data tab and the Control Source is the first
line. Type the above directly on that line, (including the = sign).

You do know, I hope, that this Age computation should NOT be stored in
any table.
Just compute it and display it on a form or report, as needed.
--
Fred
Please only reply to this newsgroup.
I do not reply to personal email.