分享

VB 日期时间函数

 hdzgx 2017-11-07
1. Year(X),Month(X),Day(X):取出年,月,日
[格式]:
P=Year(X)  取出X"年"部分的数值
P=Month(X) 取出X"月"部分的数值
P=Day(X)  取出X"日"部分的数值
[说明]:Year返回的是公元年,若X里只有时间,没有日期,则日期视为#1899/12/30#

2. Hour,Minute,Second函数:取出时,分,或秒
[格式]:
P=Hour(X)  取出X"时"部分的数值
P=Minute(X) 取出X"分"部分的数值
P=Second(X) 取出X"秒"部分的数值
[说明]:Hour的返回值是0---23之间

[范例]:
X=10:34:23
P=Hour(X)
Q=Minute(X)
R=Second(X)
则输出结果:P=10,Q=34,R=23

3. DateSerial函数:合并年,月,日成为日期
[格式]:DateSerial(Y,M,D) 其中Y是年份,M为月份,D为日期
[说明]:
(1) M值若大于12,则月份从12月起向后推算M-12个月;若小于1,则月份从1月起向后推算1-M个月。
(2) 若日期D大于当月的日数,则日期从当月的日数起,向后推算D-当月日数;若小于1,则日期从1日起向前推算1-D日。
[范例]:
P=DateSerial(2000,02,02)
则结果为P=2000/02/02


4.TimeSerial函数:合并时,分,秒成为时间
[格式]:P=TimeSerial(H,M,S) 其中H为小时数,M为分钟数,S为秒数
[说明]:推算原理同上面的DateSerial

[范例]:
P=TimeSerial(6,32,45) 结果为:P=6:32:45


5.Date,Time,Now函数:读取系统的日期时间
[格式]:
P=Date()
P=Time()
P=Now()
[说明]:这三个函数都无参数

[范例]:若当前时间为2003年8月29日晚上19点26分45秒,则
P=Now() 结果为:P=2003-08-29 19:26:45 

    本站是提供个人知识管理的网络存储空间,所有内容均由用户发布,不代表本站观点。请注意甄别内容中的联系方式、诱导购买等信息,谨防诈骗。如发现有害或侵权内容,请点击一键举报。
    转藏 分享 献花(0

    0条评论

    发表

    请遵守用户 评论公约

    类似文章 更多