在开始介绍VBA中的日期与时间函数前,先提下Date 数据类型。 在VBA中,Date数据类型是将日期和时间当作实数来存储,一共占用8个字节。小数点左方为日期,小数点右方为时间。具体说来,数值的整型部分包含从1899年12月30日算起的日数(可以用formatdatetime(0,vblongdate试试),数值的小数部分表示当天的具体时间。一般来说,具体的存放机制我们不必关心,VBA能灵活的进行内部浮点格式与外部日期显示之间的转换。
1>Date函数 功能:返回包含系统日期的Variant (Date),不包含时间。 语法:Date 如果要设置系统日期,请使用Date语句。 示例:
2>Now函数 功能:返回一个Variant (Date),根据计算机系统设置的日期和时间来指定日期和时间。 语法:Now 示例:
3> Time函数 功能:返回一个指明当前系统时间的 Variant (Date)。 语法:Time 说明:为了设置系统时间,请使用 Time 语句。 示例:
4>Timer函数 功能:返回一个 Single,代表从午夜开始到现在经过的秒数。 语法:Timer 说明:MicrosoftWindows中,Timer函数返回一秒的小数部分。在Macintosh上,计时器的精度是1秒。 一般会用这个函数来测试代码运行所花费的时间。 示例:
练习:写自定义函数,唯一的参数是身份证号码,返回年龄。身份证号码15,18位均可。对于无效的身份证号码可以通过返回值为"无效的身份证号码"给予提示。
|