返回给定日期的指定部分。
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 参数可以有以下值:
常数 |
值 |
描述 |
---|---|---|
vbUseSystem |
0 |
使用区域语言支持 (NLS) API 设置。 |
vbSunday |
1 |
星期日(默认) |
vbMonday |
2 |
星期一 |
vbTuesday |
3 |
星期二 |
vbWednesday |
4 |
星期三 |
vbThursday |
5 |
星期四 |
vbFriday |
6 |
星期五 |
vbSaturday |
7 |
星期六 |
firstweekofyear 参数可以有以下值:
常数 |
值 |
描述 |
---|---|---|
vbUseSystem |
0 |
使用区域语言支持 (NLS) API 设置。 |
vbFirstJan1 |
1 |
由 1 月 1 日所在的星期开始(默认)。 |
vbFirstFourDays |
2 |
由在新年中至少有四天的第一周开始。 |
vbFirstFullWeek |
3 |
由在新的一年中第一个完整的周(不跨年度)开始。 |
说明
DatePart 函数用于计算日期并返回指定的时间间隔。例如使用 DatePart 计算某一天是星期几或当前的时间。
firstdayofweek 参数会影响使用“w”和“ww”间隔符号的计算。
如果 date 是日期文字,则指定的年度会成为日期的固定部分。但是如果 date 被包含在引号 (" ") 中,并且省略年份,则在代码中每次计算 date 表达式时,将插入当前年份。这样就可以编写适用于不同年份的程序代码。.
下面的示例利用 DatePart 函数获得日期并显示该日所在的季节。
Function GetQuarter(TheDate) GetQuarter = DatePart("q", TheDate)End Function