DateValue 函数
应用对象
返回 变量 (日期) 。
语法
DateValue (日期)
所需的 date参数通常是表示从 100 年 1 月 1 日到 9999 年 12 月 31 日的日期的字符串表达式。 但是， date 也可以是表示该范围内的日期、时间或日期和时间的任何表达式。
备注
如果 date 是仅包含由有效日期分隔符分隔的数字的字符串， 则 DateValue 将根据为系统指定的短日期格式识别月份、日期和年份的顺序。 DateValue 还识别包含月名的明确日期（长或缩写形式）。 例如，除了识别 12/30/1991 和 12/30/91 之外， DateValue 还识别 1991 年 12 月 30 日和 1991 年 12 月 30 日。
如果省略 日期 的年份部分， 则 DateValue 使用计算机系统日期中的当前年份。
如果 date 参数包含时间信息， 则 DateValue 不会返回它。 但是，如果 date 包含无效的时间信息 (（例如“89：98”) ），则会发生错误。
注意
对于 date，如果 Calendar 属性设置为 Gregorian，则提供的日期必须为 Gregorian。 如果日历为 Hijri，则提供的日期必须为 Hijri。 如果提供的日期是 Hijri，则参数 日期 为 字符串 ，表示从 1/1/100 (公历 8 月 2 日) 到 4/3/9666 (公历 12 月 31 日， 9999) 。
查询示例
| Expression | 结果 |
|---|---|
| SELECT DateValue ([DateTime]) AS Expr1 FROM ProductSales; | 以短日期格式返回字段“DateTime”的日期值，而不返回时间信息。 |
| SELECT DateValue ([DateTime]) AS NewDate， Count (ProductSales.DateTime) AS CountOfDateTime FROM ProductSales GROUP BY DateValue ([DateTime]) ; | 以短日期格式返回字段“DateTime”的日期值，而不返回时间信息。 |
VBA 示例
注意
下面的示例演示了如何在 Visual Basic for Applications (VBA) 模块中使用此函数。 有关使用 VBA 的详细信息，请在搜索旁边的下拉列表中选择“开发人员参考”，并在搜索框中输入一个或多个术语。
此示例使用 DateValue 函数将字符串转换为日期。 还可以使用日期文本直接将日期分配给 Variant 或 Date 变量，例如 MyDate = #2/12/69#。
Dim MyDate
MyDate = DateValue("February 12, 1969") ' Return a date.