设为首页收藏本站Access中国

Office中国论坛/Access中国论坛

 找回密码
 注册

QQ登录

只需一步,快速开始

年龄计算小程序

1970-1-1 08:00| 发布者: taoether| 查看: 1233| 评论: 0

=======================
    年龄计算小程序
=======================

年龄计算小程序1.00
---
  这个小程序是我在整理女儿照片时所做的。
  因为照片上只有拍摄日期,但我要标注女儿的年龄,几年几月又几天,所以才做了这个小小的程序。
  此程序可以计算虚岁,周岁,天数,并可计算出年龄合XX年XX月XX天。程序界面如:年龄计算小程序1.00.jpg。

  计算年龄虽然看起来很简单,但实际做起来要考虑很多情况,我采用的具体计算方法如下:
  1,计算虚岁时,两个日期年份相减后要加1,因为习惯上,人一出生就是1岁,过了一个年后就变为2岁了。
  2,计算周岁时,要考虑当前日期是不是过了生日(此时要考虑当前月份和日期是否过了生日的前一天,一定要注意是前一天,而不是生日当天),过了生日,周岁为两个年份相减的结果,否则要在结果上再减1。
  3,计算天数时,可以直接将两个日期相减,但要再加1,才是正确的天数。
  4,计算年龄(年)时,可以使用计算周岁时的计算方法。
  5,计算年龄(月)时,要计算最近一次生日的前一天到当前日期的天数,再计算此天数相当于多少个月,这里分别使用了两个值:当周岁<4时,使用30天/月,当周岁>=4时,使用30.43天/月(计算依据为(365*3+366)/12*4=30.437)。这样设置可能也不太合理,暂时这样设置吧。
  6,计算年龄(天)时,使用计算年龄(月)时的余数即可。

  不好意思,雕虫小技,让大家见笑了!

TTT 13:48 2005-7-29

+++
年龄计算小程序1.01
---
  此次在原来的程序上加了按钮,可以执行计算和清除数据,班门弄斧,雕虫小技,见笑见笑!
  此外,修改计算年龄(月)和年龄(天)时使用的每月天数,由原来的按周岁判断而使用不同的值,现改为全部使用30.4167(365/12=30.4167)。(因为忽然发现最近一次生日的前一天到当前日期的天数最多为365天,最多可能含一次闰年问题,不用考虑平均到4年内,所以全部采用30.4167,忽略闰年问题,这样可以将错误减少到最小。)

  程序界面如:年龄计算小程序1.01.jpg。

TTT 13:48 2005-8-1

+++
年龄计算小程序1.01
---
    加入姓名,并针对25周岁以上的人显示以下警示语句:一个人的生命最多有3万多天,在浩瀚的时间长河中,实在是太渺小了! 让我们抛弃不必要的烦恼,珍惜生命,热爱生命,享受每一天!  

    程序界面如:年龄计算小程序1.02.jpg。

TTT 13:36 2005-8-2


下载地址:http://www.office-cn.net/BBS/viewFile.asp?Boardid=128&ID=12176

最新评论

QQ|站长邮箱|小黑屋|手机版|Office中国/Access中国 ( 粤ICP备10043721号-1 )  

GMT+8, 2024-4-29 19:11 , Processed in 0.060787 second(s), 16 queries .

Powered by Discuz! X3.3

© 2001-2017 Comsenz Inc.

返回顶部