源码网商城,靠谱的源码在线交易网站 我的订单 购物车 帮助

源码网商城

VBS教程:函数-DateDiff 函数

  • 时间:2022-08-16 00:42 编辑: 来源: 阅读:
  • 扫一扫,手机访问
摘要:VBS教程:函数-DateDiff 函数

DateDiff 函数

返回两个日期之间的时间间隔。 [code][b]DateDiff([/b]interval, date1, date2 [,firstdayofweek[, firstweekofyear]][b])[/b][/code] [b]DateDiff[/b] 函数的语法有以下参数: [h3]参数[/h3][i]interval[/i] 必选项。String expression 表示用于计算 [b]date1[/b] 和 [b]date2[/b] 之间的时间间隔。有关数值,请参阅“设置”部分。 [i]date1, date2[/i] 必选项。日期表达式。用于计算的两个日期。 [i]Firstdayofweek[/i] 可选项。指定星期中第一天的常数。如果没有指定,则默认为星期日。有关数值,请参阅“设置”部分。 [i]Firstweekofyear[/i] 可选项。指定一年中第一周的常数。如果没有指定,则默认为 1 月 1 日所在的星期。有关数值,请参阅“设置”部分。 [h3]设置[/h3][b]interval[/b] 参数可以有以下值:
设置描述
yyyy
q季度
n
y一年的日数
d
w一周的日数
ww
h小时
m分钟
s
firstdayofweek 参数可以有以下值:
常数描述
vbUseSystem0使用区域语言支持 (NLS) API 设置。
vbSunday1星期日(默认)
vbMonday2星期一
vbTuesday3星期二
vbWednesday4星期三
vbThursday5星期四
vbFriday6星期五
vbSaturday7星期六
firstweekofyear 参数可以有以下值:
常数描述
vbUseSystem0使用区域语言支持 (NLS) API 设置。
vbFirstJan11由 1 月 1 日所在的星期开始(默认)。
vbFirstFourDays2由在新年中至少有四天的第一周开始。
vbFirstFullWeek3由在新的一年中第一个完整的周开始。
[h3]说明[/h3][b]DateDiff[/b] 函数用于判断在两个日期之间存在的指定时间间隔的数目。例如可以使用 [b]DateDiff[/b] 计算两个日期相差的天数,或者当天到当年最后一天之间的星期数。 要计算 [b]date1[/b] 和 [b]date2[/b] 相差的天数,可以使用“一年的日数”(“y”)或“日”(“d”)。当 [b]interval [/b]为“一周的日数”(“w”)时,[b]DateDiff[/b] 返回两个日期之间的星期数。如果 [b]date1[/b] 是星期一,则 [b]DateDiff[/b] 计算到 [b]date2[/b] 之前星期一的数目。此结果包含 [b]date2[/b] 而不包含 [b]date1[/b]。如果 [b]interval[/b] 是“周”(“ww”),则 [b]DateDiff[/b] 函数返回日历表中两个日期之间的星期数。函数计算 [b]date1[/b] 和 [b]date2[/b] 之间星期日的数目。如果 [b]date2[/b] 是星期日,[b]DateDiff[/b] 将计算 [b]date2[/b],但即使 [b]date1[/b] 是星期日,也不会计算 [b]date1[/b]。 如果 [b]date1[/b] 晚于 [b]date2[/b],则 [b]DateDiff[/b] 函数返回负数。 [b]firstdayofweek[/b] 参数会对使用“w”和“ww”间隔符号的计算产生影响。 如果 [b]date1[/b] 或 [b]date2[/b] 是日期文字,则指定的年度会成为日期的固定部分。但是如果 [b]date1[/b] 或 [b]date2[/b] 被包括在引号 (" ") 中并且省略年份,则在代码中每次计算 [b]date1[/b] 或 [b]date2[/b] 表达式时,将插入当前年份。这样就可以编写适用于不同年份的程序代码。 在 [b]interval [/b]为“年”(“yyyy”)时,比较 12 月 31 日和来年的 1 月 1 日,虽然实际上只相差一天,[b]DateDiff[/b] 返回 1 表示相差一个年份。 下面的示例利用 [b]DateDiff[/b] 函数显示今天与给定日期之间间隔天数:
[code]Function DiffADate(theDate)  DiffADate = "[/code]从当天开始的天数[code]:" & [b]DateDiff([/b]"d"[b],[/b] Now[b],[/b] theDate[b])[/b][/code][code]End Function[/code]
  • 全部评论(0)
联系客服
客服电话:
400-000-3129
微信版

扫一扫进微信版
返回顶部