foxpro6.0出生日期成年龄

直接简单的年龄
按照
year(date())-year(出生日期)
这个作为年龄

一年长一岁么
替换一下就可以了
replace 年龄字段 with year(date())-year(出生日期) for .t.

&& modify comma <程序名>
use <表文件名>
replace all 年龄 with year(date())-year(出生日期)
use
return
如果要更新的话，过一年后把这个程序再用一次就行了嘛 。
前提是你有这个表文件，还有表文件里有出生日期和年龄这两个字段。

要自动更新年龄确实挺麻烦,如果你是用一个程序显示的话数据的话,可以在程序里编一个更新年龄的程序段,在打开程序显示数据的时候更新年龄,如果你直接用BROWSE来显示,你可以不要输入年龄,输入出生日期,然后为这个数据库做一个格式文件,这样数据库里的数据虽不会改变,但显示的时候可以显示现在的年龄,过一年长一岁,呵呵...
当然,基本的算法还是和楼上的朋友一样的了只是实现方法很多的,还可以做一个菜单,手动更新,点一下就可以,一年只点一次不麻烦吧