用户登录  |  用户注册
首 页源码下载网络学院最新源码源码排行屏蔽广告
当前位置:新兴网络 > 网络学院 > 编程开发 > Visual Basic

VB 计算两个日期之差之DateDiff函数

减小字体 增大字体 作者:佚名  来源:本站整理  发布时间:2010-07-09 17:50:33

说明:
DateDiff 函数返回 Variant (Long) 的值,表示两个指定日期间的时间间隔数目。

DateDiff 函数可用来决定两个日期之间所指定的时间间隔数目。例如,可以使用 DateDiff 来计算两个日期之间相隔几日,或计算从今天起到年底还有多少个星期。
计算方法是 date2 - date1

语法:

DateDiff(interval,date1,date2[,firstdayofweek[,firstweekofyear]])

参数 描述
interval 必需的。计算 date1 和 date2 之间的时间间隔的单位。
可采用下面的值:
yyyy - 年
q - 季度
m - 月
y - 当年的第几天
d - 日
w - 当周的第几天
ww - 周
h - 小时
n - 分钟
s - 秒
date1,date2 必需的。日期表达式。在计算中需要使用的两个日期。
firstdayofweek 可选的。规定一周的日数,即当周的第几天。
可采用下面的值:
0 = vbUseSystemDayOfWeek - 使用区域语言支持 (NLS) API 设置。
1 = vbSunday - 星期日 (默认)
2 = vbMonday - 星期一
3 = vbTuesday - 星期二
4 = vbWednesday - 星期三
5 = vbThursday - 星期四
6 = vbFriday - 星期五
7 = vbSaturday - 星期六
firstweekofyear 可选的。规定一年中的第一周。
可采用下面的值:
0 = vbUseSystem - 使用区域语言支持 (NLS) API 设置。
1 = vbFirstJan1 - 由 1 月 1 日所在的星期开始(默认)。
2 = vbFirstFourDays - 由在新年中至少有四天的第一周开始。
3 = vbFirstFullWeek - 由在新的一年中第一个完整的周开始。

实例: 


HTML code运行代码复制代码编辑
<script language="VBScript">

'以“秒”为单位计算两时间之差
Msgbox DateDiff("S","2010-7-7 18:00:00","2010-7-7 18:00:15")

'计算2008-8-8 与现在相隔多少天 ,now()函数是获取当前的日期时间
Msgbox DateDiff("D","2008-8-8",now())

</SCRIPT>

Tags:VBScript 日期之差 DateDiff 日期时间

作者:佚名
  • 好的评价 如果您觉得此文章好,就请您
      100%(4)
  • 差的评价 如果您觉得此文章差,就请您
      0%(0)

网络学院评论评论内容只代表网友观点,与本站立场无关!

   评论摘要(共 0 条,得分 0 分,平均 0 分) 查看完整评论