根据生日如何计算年龄 - 专家坐堂 - Foxtable(狐表) - 新一代数据库软件，完美融合Access、Foxpro、Excel、vb.net之优势，人人都能掌握的快速软件开发工具!

Foxtable(狐表) → 用户栏目 → 专家坐堂 → 根据生日如何计算年龄

共有3339人关注过本帖树形打印复制链接主题：根据生日如何计算年龄

qixialcl

小大 1楼 | QQ | 信息 | 搜索 | 邮箱 | 主页 | UC

等级：婴狐帖子：10 积分：236 威望：0 精华：0 注册：2015/3/8 14:03:00

根据生日如何计算年龄 发帖心情

Post By：2015/3/22 19:05:00 [显示全部帖子]

大家好，我刚接触foxtable ,自己制作一份表格，想以此来提高工作效率，但是根据生日来计算年龄的表达式一直不对，请各位大侠能帮忙解决一下！，精确到月就可以！

qixialcl

小大 2楼 | QQ | 信息 | 搜索 | 邮箱 | 主页 | UC

等级：婴狐帖子：10 积分：236 威望：0 精华：0 注册：2015/3/8 14:03:00

Post By：2015/3/22 21:56:00 [显示全部帖子]

谢谢大侠！

Select Case e.DataCol.name

Case "生日"

If e.DataRow.IsNull("生日") Then

e.DataRow("年龄_年") = Nothing

e.DataRow("年龄_月") = Nothing

e.DataRow("年龄_日") = Nothing

Else

Dim y,m,d As Integer

DateYMD(e.DataRow("生日"),Date.Today,y,m,d)

e.DataRow("年龄_年") = y

e.DataRow("年龄_月") = m

e.DataRow("年龄_日") = d

End If

End Select

这是我按照例子更改的代码，为什么显示：编译错误“e"是private,因此它在此上下文中不可访问

qixialcl

小大 3楼 | QQ | 信息 | 搜索 | 邮箱 | 主页 | UC

等级：婴狐帖子：10 积分：236 威望：0 精华：0 注册：2015/3/8 14:03:00

Post By：2015/3/22 22:15:00 [显示全部帖子]

谢谢！

这次没有报错，在Datacolchanged栏目里显示{集合}，但是在表格里不显示数据

主题：根据生日如何计算年龄