Todd,

Here's one way that is always correct and returns the years and months as a string.

FUNCTION HowOld
LPARAMETERS pdBirth, pdOn
LOCAL lnYears, lnMonths

lnMonths = 0
DO WHILE pdBirth <= pdOn
   lnMonths = lnMonths + 1
   pdBirth = GOMONTH(pdBirth,1)
ENDDO

lnMonths = lnMonths - 1
lnYears = INT(lnMonths / 12)
lnMonths = lnMonths % 12

RETURN ALLTRIM(STR(lnYears)) + " year" + IIF(lnYears<>1,"s","") + ;
           " and " + ALLTRIM(STR(lnMonths)) + " month" + ;
           IIF(lnMonths<>1,"s","")