如何在窗体中通过文本框与命令按钮来修改系统时间?

ouxingwang

我想建一个弹出窗体,该窗体中有一个文本框和一个命令按钮,在"文本框"中输入要修改的日期,点"命令"按钮,就可以把系统时间修改过来,却不知如何编写代码,请各位高手指点.

大熊

设置当前系统时间。

MyTime = #4:35:17 PM#    ' 指定一时间。
Time = MyTime    ' 将系统时间设置为 MyTime 的内容。

设置当前系统日期。

语法

Date = date

对于运行 Microsoft Windows 95 的系统，要设置的 date 必须介于 1980 年 1月 1 日与 2099 年 12 月 31 日之间。对于运行 Microsoft Windows NT 的系统，date 必须介于公元 1980 年 1 月 1 日到 2079 年 12 月 31 日之间。

对于Macintosh，date值必须是介于1904年1月1日到2040年2月5日之间的日期。