Date 语句

设置当前系统日期。

语法

日期=日期

对于运行 Microsoft Windows 95 的系统,所需的 日期 规范必须是从 1980 年 1 月 1 日到 2099 年 12 月 31 日的日期。 对于运行 Microsoft Windows NT 的系统,日期必须是从 1980 年 1 月 1 日到 2079 年 12 月 31 日的日期。 对于 Macintosh, 日期 必须是 1904 年 1 月 1 日至 2040 年 2 月 5 日的日期。

示例

此示例使用 Date 语句设置计算机系统日期。 在开发环境中,使用代码的区域设置以短日期格式显示日期文本。

Dim MyDate 
MyDate = #February 12, 1985# ' Assign a date. 
Date= MyDate ' Change system date. 

另请参阅

支持和反馈

有关于 Office VBA 或本文档的疑问或反馈? 请参阅 Office VBA 支持和反馈,获取有关如何接收支持和提供反馈的指南。