VBS教程:函数-DatePart 函数


DatePart 函数

返回给定日期的指定部分 。

DatePart(interval, date[, firstdayofweek[, firstweekofyear]])

Arguments

interval

必选项 。字符串表达式表示要返回的时间间隔 。有关数值,请参阅“设置”部分 。

Date

必选项 。要计算的日期表达式 。

firstdayof week

可选项 。指定星期中的第一天的常数 。如果没有指定,则默认为星期日 。有关数值,请参阅“设置”部分 。

Firstweekofyear

可选项 。指定一年中第一周的常数 。如果没有指定,则默认为 1 月 1 日所在的星期 。有关数值,请参阅“设置”部分 。

设置

interval 参数可以有以下值:

设置描述
yyyy
q季度
m
y一年的日数
d
w一周的日数
ww
h小时
n分钟
s

firstdayofweek 参数可以有以下值:

常数描述
vbUseSystem0使用区域语言支持 (NLS) API 设置 。
vbSunday1星期日(默认)
vbMonday2星期一
vbTuesday3星期二
vbWednesday4星期三
vbThursday5星期四
vbFriday6星期五
vbSaturday7星期六

firstweekofyear 参数可以有以下值:

常数描述
vbUseSystem0使用区域语言支持 (NLS) API 设置 。
vbFirstJan11由 1 月 1 日所在的星期开始(默认) 。
vbFirstFourDays2由在新年中至少有四天的第一周开始 。
vbFirstFullWeek3由在新的一年中第一个完整的周(不跨年度)开始 。

说明

DatePart 函数用于计算日期并返回指定的时间间隔 。例如使用 DatePart 计算某一天是星期几或当前的时间 。

firstdayofweek 参数会影响使用“w”和“ww”间隔符号的计算 。

如果 date 是日期文字,则指定的年度会成为日期的固定部分 。但是如果 date 被包含在引号 (" ") 中,并且省略年份,则在代码中每次计算 date 表达式时,将插入当前年份 。这样就可以编写适用于不同年份的程序代码 。.

下面的示例利用 DatePart 函数获得日期并显示该日所在的季节 。

 Function GetQuarter(TheDate)   GetQuarter = DatePart("q", TheDate)End Function