返回一个包含当前系统日期的 Variant (Date) 值。
语法
Date
备注
若要设置系统日期,请使用 Date 语句。
如果将 Date 函数用于公历, 则 Date$ 的行为不会因 Calendar 属性设置而改变。 如果日历为 Hijri,则 Date$ 返回 mm-dd-yyyy 形式的 10 个字符字符串,其中 mm (01-12 ) ,dd (01-30) 和 yyyy (1400-1523) 为 Hijri 月、日和年。 等效的公历范围是 1980 年 1 月 1 日至 2099 年 12 月 31 日。
查询示例
Expression |
结果 |
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 函数。 例如,可以在窗体上设置文本框的 “控件源” 属性,如下所示:
=Date()
在窗体视图中打开窗体时,文本框将显示当前系统日期。
在 VBA 代码中使用 Date 函数
注意: 下面的示例演示了如何在 Visual Basic for Applications (VBA) 模块中使用此函数。 有关使用 VBA 的详细信息,请在搜索旁边的下拉列表中选择“开发人员参考”,并在搜索框中输入一个或多个术语。
此示例使用 Date 函数返回当前系统日期。
Dim MyDate
MyDate = Date ' MyDate contains the current system date.