易语言取系统当前时间

版本 2

子程序 __启动窗口_创建完毕

局部变量 time, 日期时间型

局部变量 timestr, 文本型

局部变量 当前时间, 文本型

time ＝ 取现行时间 ()

timestr ＝ 到文本 (取时间 (time))

当前时间 ＝ 取文本中间 (timestr, 寻找文本 (timestr, “日”, , 假) ＋ 2, 12)

信息框 (当前时间, 0, )

版本2

局部变量时间,整数型

时间＝取小时(取现行时间())如果(时间＜6或时间＞20)

载入(窗口1,,假)否则

载入(窗口2,,假)

上面一样的思路

版本2

局部变量时间,整数型局部变量星期,整数型

时间＝取小时(取现行时间())星期＝取星期几(取现行时间())标题＝到文本(时间)＋“-----”＋到文本(星期)如果(星期＝2且时间＝19)

载入(窗口3,,假)否则

如果(时间＜6或时间＞20)

载入(窗口1,,假)

否则

载入(窗口2,,假)

如果结束

如果结束

月数不好定，因为每个月天数不一样。算到天就行了。

代码如下：

版本

2

支持库

spec

子程序

_按钮1_被单击

局部变量

运行时间,

整数型,

,

,

毫秒

运行时间

＝

取启动时间

()

调试输出

(取毫秒到天

(运行时间))

子程序

取毫秒到天,

文本型

参数

参_秒,

整数型

局部变量

参_秒,

整数型

局部变量

天,

整数型

局部变量

小时,

整数型

局部变量

分钟,

整数型

局部变量

秒,

整数型

参_秒

＝

取启动时间

()

÷

1000

天

＝

参_秒

÷

60

÷

60

÷

24

小时

＝

(参_秒

－

天

×

24

×

3600)

÷

3600

分钟

＝

(参_秒

－

天

×

24

×

3600

－

小时

×

3600)

÷

60

秒

＝

参_秒

％

60

返回

(到文本

(天)

＋

“天”

＋

到文本

(小时)

＋

“小时”

＋

到文本

(分钟)

＋

“分钟”

＋

到文本

(秒)

＋

“秒”)

版本 2

支持库 iext

程序集 窗口程序集1

子程序 __启动窗口_创建完毕

状态条1置文本 (0, 到文本 (取现行时间 ()))

子程序 _时钟1_周期事件

状态条1置文本 (0, 到文本 (取现行时间 ()))

时钟周期为1000

以上就是关于易语言取系统当前时间全部的内容，包括:易语言取系统当前时间、易语言怎么判断系统时间、求一个简单的易语言源码，取系统运行时间的等相关内容解答，如果想了解更多相关内容，可以关注我们，你们的支持是我们更新的动力！