如何用程序设置windows的系统时间?

8276 2003-10-18 04:47:08
是什么函数?
...全文
60 8 打赏 收藏 转发到动态 举报
写回复
用AI写文章
8 条回复
切换为时间正序
请发表友善的回复…
发表回复
hemeijun81 2003-10-21
  • 打赏
  • 举报
回复
date=日期
time=时间
Struggling 2003-10-18
  • 打赏
  • 举报
回复
学习
dreamflying1980 2003-10-18
  • 打赏
  • 举报
回复
time=时间
data=日期
kmzs 2003-10-18
  • 打赏
  • 举报
回复
不错
goodname008 2003-10-18
  • 打赏
  • 举报
回复
Date 语句示例
本示例使用 Date 语句来设置系统日期。在开发环境中,日期原义会根据系统的地区设置,以短式日期格式显示。

Dim MyDate
MyDate = #February 12, 1985# ' 指定某个日期。
Date = MyDate ' 改变系统日期。



Time 语句示例
本示例使用 Time 语句来设置系统时间。

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

goodname008 2003-10-18
  • 打赏
  • 举报
回复
Time 语句


设置系统时间。

语法

Time = time

必要的 time 参数,可以是任何能够表示时刻的数值表达式、字符串表达式或它们的组合。

说明

如果 time 是一字符串,则 Time 会试着根据系统指定的时间,利用时间分隔符将其转换成一个时间。如果无法转换成一个有效的时间,则会导致错误发生。




Date 语句


设置当前系统日期。

语法

Date = date

对于运行 Microsoft Windows 95 的系统,要设置的 date 必须介于 1980 年 1月 1 日与 2099 年 12 月 31 日之间。对于运行 Microsoft Windows NT 的系统,date 必须介于公元 1980 年 1 月 1 日到 2079 年 12 月 31 日之间。
WuYunpeng 2003-10-18
  • 打赏
  • 举报
回复
date=日期
time=时间
lisen101 2003-10-18
  • 打赏
  • 举报
回复
Date = Nvl(rs2!now_date, "9999/99/99")
Time = Nvl(rs2!now_time, "00:00:00")

now_date和now_time是要设定的时间!

7,759

社区成员

发帖
与我相关
我的任务
社区描述
VB 基础类
社区管理员
  • VB基础类社区
加入社区
  • 近7日
  • 近30日
  • 至今
社区公告
暂无公告

试试用AI创作助手写篇文章吧