DatePart 函数

返回一个 Variant (Integer) 值,其中包含给定日期的指定部分。

语法

日期 ( interval, date [, firstdayofweek] [, firstweekofyear] )

DatePart函数语法具有以下参数:

参数

描述

interval

必需。 字符串表达式, 表示要返回的时间间隔。

date

必需。 变体要计算的 (日期) 值。

firstdayofweek

可选。 指定一周的第一天的 常量 。 如果未指定, 则假定为星期日。

firstweekofyear

可选。 一个常量, 指定一年的第一周。 如果未指定, 则第一周假定为1月1日所在的一周。

设置

间隔 参数 具有以下设置:

设置

说明

yyyy

q

季度

m

y

一年中的某一天

d

w

Weekday

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括在双引号 ("") 中, 并且省略了年份, 则每次计算日期表达式时, 当前年份都会插入到代码中。 这样便可以编写可在不同年份使用的代码。

注意: 对于日期, 如果Calendar属性设置为公历, 则提供的日期必须是公历。 如果日历是回历, 则提供的日期必须是回历。

返回的日期部分为当前阿拉伯语日历的时间段单位。 例如, 如果当前日历是回历, 并且要返回的日期部分是年份, 则年份值为回历年份。

查询示例

表达式

结果

选择 "DatePart" ("yyyy", [DateofSale]) 作为 NewDate FROM ProductSales;

返回字段 "DateofSale" 的日期值的 "Year"。

选择 "DatePart" ("q", [DateofSale]) 作为 NewDate FROM ProductSales;

返回字段 "DateofSale" 的日期值的 "季度" (基于日历年份)。

选择 "DatePart" ("y", [DateofSale]) 作为 NewDate FROM ProductSales;

返回字段 "DateofSale" 的日期值的 "Year Day" (1 到 365)。

选择 "DatePart" ("d", [DateofSale]) 作为 NewDate FROM ProductSales;

返回字段 "DateofSale" 的日期值的 "Day"。

选择 "DatePart" ("w", [DateofSale]) 作为 NewDate FROM ProductSales;

返回字段 "DateofSale" 的日期值的 "Weekday" (从1到 7, 其中1表示星期日)。

选择 "DatePart" ("ww", [DateofSale]) 作为 NewDate FROM ProductSales;

返回字段 "DateofSale" 的日期值的 "周数" (从1到 52)。

从 ProductSales 中选择 DatePart ("h", [DateTime]) 作为 NewDate。

返回字段 "DateTime" 的日期值的 "小时"。

从 ProductSales 中选择 DatePart ("n", [DateTime]) 作为 NewDate。

返回字段 "DateTime" 的日期值的 "分钟"。

从 ProductSales 中选择 DatePart ("s", [DateTime]) 作为 NewDate。

返回字段 "DateTime" 的日期值的 "秒"。

VBA 示例

注意: 下面的示例演示了在 Visual Basic for Applications (VBA) 模块中使用此函数的示例。 有关使用 VBA 的详细信息, 请在 "搜索" 旁边的下拉列表中选择 "开发人员引用", 然后在搜索框中输入一个或多个字词。

此示例获取一个日期, 并使用DatePart函数显示该日期出现在一年中的第几个季度。

Dim TheDate As Date    ' Declare variables.
Dim Msg
TheDate = InputBox("Enter a date:")
Msg = "Quarter: " & DatePart("q", TheDate)
MsgBox Msg

注意:  本页面是自动翻译的,可能包含语法错误或不准确之处。 我们的目的是使此内容能对你有所帮助。 能否告知我们此信息是否有所帮助? 下面是该参考内容的英文版

扩展你的 Office 技能
了解培训
抢先获得新功能
加入 Office 预览体验计划

此信息是否有帮助?

谢谢您的反馈!

谢谢你的反馈! 可能需要转接到 Office 支持专员。

×