标题:求解月龄?
取消只看楼主
shzhshg
Rank: 1
等 级:新手上路
帖 子:147
专家分:0
注 册:2010-5-7
结帖率:85.71%
已结贴  问题点数:5 回复次数:2 
求解月龄?
字段名   类型
出生日期  字符
查体日期  字符
月  龄  字符

例如:出生日期  2004.05.10
   查体日期  2008.10.06
   如何得到月龄  4岁5月?
搜索更多相关主题的帖子: 出生日期 如何 
2014-05-08 06:30
shzhshg
Rank: 1
等 级:新手上路
帖 子:147
专家分:0
注 册:2010-5-7
得分:0 
回复 4 楼 liuxingang28
求解月龄?
字段名   类型
出生日期  字符
查体日期  字符
月  龄  字符

例如:出生日期  2004.05.10
   查体日期  2008.10.06
   如何得到月龄  4岁5月?
老师以下代码可以实现以上的要求
d1 = ctod(出生日期)                && 转换成日期型
d2 = ctod(查体日期)
nYear = year(d2)-year(d1)          && 求相差年份
nMont = mont(d2)-mont(d1)          && 求相差月份
if nMont < 0                       && 若查体日期的月份比出生日期的月份小
    nYear = nYear - 1              && 修正年份
    nMont = nMont + 12             && 修正月份
endif
? tran(nYear)+'岁'+tran(nMont)+'个月'    && 显示查询结果

老师,我还有个要求?就是通过出生日期和查体日期能否算出月龄?

比如:4岁5月就是53
2014-05-10 07:12
shzhshg
Rank: 1
等 级:新手上路
帖 子:147
专家分:0
注 册:2010-5-7
得分:0 
回复 4 楼 liuxingang28
? tran(nYear)+'岁'+tran(nMont)+'个月'    && 显示查询结果
老师,这句能否实现表内直接从查体日期-出生日期得到年龄字段中?
2014-05-18 22:25



参与讨论请移步原网站贴子:https://bbs.bccn.net/thread-431182-1-1.html




关于我们 | 广告合作 | 编程中国 | 清除Cookies | TOP | 手机版

编程中国 版权所有,并保留所有权利。
Powered by Discuz, Processed in 0.234166 second(s), 8 queries.
Copyright©2004-2024, BCCN.NET, All Rights Reserved