返回一个包含当前系统日期的 Variant (Date) 值。
语法
Date
备注
若要设置系统日期，请使用 Date 语句。
如果将 Date函数与公历一同使用，则"日历"属性设置不会更改 Date$的行为。 如果日历是回历，则Date$返回格式为 mm-dd-yyyy的 10 个字符的字符串，其中mm (01-12 ) 、dd (01-30) 和yyyy (1400-1523) 是回历月份、日期和时间。 等效的公历范围是 1980 年 1 月 1 日到 2099 年 12 月 31 日。
查询示例
|
表达式 |
结果 |
|
SELECT Date () AS Expr1 FROM ProductSales GROUP BY Date () ; |
返回短日期格式的当前系统"date"。 结果："dd/mm/yyyy"。 |
|
SELECT Date () -[DateofSale] AS DaysSinceSale FROM ProductSales; |
返回当前系统"Date"与字段"DateofSale"的日期值之间的差值作为数字，在列"DaySinceSale"中显示结果。 |
VBA 示例
在 表达式 中使用日期 可以在任何可以使用表达式的地方使用 Date 函数。 例如，可以在窗体上设置文本框的"控件来源"属性，如下所示：
=Date()
在窗体视图中打开窗体时，文本框将显示当前系统日期。
在 VBA 代码中使用 Date 函数
注意: 以下示例演示了在 VBA Visual Basic for Applications (模块) 函数。 有关使用 VBA 的信息，请在"搜索"旁边的下拉列表中选择"开发人员参考"，在搜索框中输入一个或多个术语。
此示例使用 Date 函数返回当前系统日期。
Dim MyDate
MyDate = Date ' MyDate contains the current system date.