| DatePart 函数 |
|
DatePart 函数的语法有以下参数:
| 参数 | 描述 |
| interval | 必选。字符串表达式表示要返回的时间间隔。有关数值,“设置”部分。 |
| date | 必选。要计算的日期表达式。 |
| firstdayof week | 可选。指定星期中的第一天的常数。如果没有指定,则默认为星期日。有关数值,“设置”部分。 |
| firstweekofyear | 可选。指定一年中第一周的常数。如果没有指定,则默认为 1 月 1 日所在的星期。有关数值,“设置”部分。 |
| 设置 | 描述 |
| 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 | 由在新的一年中第一个完整的周(不跨年度)开始。 |
firstdayofweek 参数会影响使用“w”和“ww”间隔符号的计算。
如果 date 是日期文字,则指定的年度会成为日期的固定部分。但是如果 date 被包含在引号 (" ") 中,并且省略年份,则在代码中每次计算 date 表达式时,将插入当前年份。这样就可以编写适用于不同年份的程序代码。.
下面例子利用DatePart 函数,显示发生的季节.
Function GetQuarter(TheDate)
GetQuarter = DatePart("q", TheDate)
End Function