易语言时钟源码
Ⅰ 求易语言用时钟设定程序运行3分钟后自动关闭程序源码
.版本 2
.子程序 _时钟1_周期事件
.判断开始 (时钟1.时钟周期 ＝ 180000)
_启动窗口.销毁 ()
.默认
.判断结束
.子程序 __启动窗口_创建完毕
时钟1.时钟周期 ＝ 180000
Ⅱ 求一个易语言每周定时运行和每天定时运行的源码
.版本 2
.支持库 spec
.程序集 窗口程序集1
.子程序 _时钟1_周期事件
.局部变量 星期, 整数型
.局部变量 时间, 文本型
星期 ＝ 取星期几 (取现行时间 ())
.如果真 (星期 ＝ 1) ' 1 代表星期天，2 是星期一 。。。。
运行 (“要运行程序的绝对路径”, 假, )
.如果真结束
' ----------------------------------------------------
时间 ＝ 到文本 (取现行时间 ())
.如果真 (时间 ＝ “XX年XX月XX日XX时XX分XX秒”)
运行 (“要运行程序的绝对路径”, 假, )
.如果真结束
调试输出 (星期, 时间)
.子程序 __启动窗口_创建完毕
' 如果真 (取文本注册项 (#现行用户, “Software\Microsoft\Windows\CurrentVersion\Run\apps”, ) ＝ “”)
' 写注册项 (#现行用户, “Software\Microsoft\Windows\CurrentVersion\Run\apps”, “要运行程序的绝对路径”)
' --------------------------------------------------------------------------------------------------
' 上面是写开机启动的，360会报警。。把编辑好的程序放到 启动 这个文件夹中也可以起到开机启动的效果，自己看着办吧
时钟1.时钟周期 ＝ 1000
Ⅲ 易语言怎样用时钟组件实现60s倒计时，求源码
.版本 2
.程序集 窗口程序集1
.程序集变量 a, 文本型
.子程序 _按钮1_被单击
.局部变量 b, 整数型
a ＝ “s”
b ＝ 60
时钟1.时钟周期 ＝ 1000
.计次循环首 (60, b)
标签1.标题 ＝ 到文本 (b) ＋ a
.计次循环尾 ()
.子程序 _时钟1_周期事件
标签1.标题 ＝ 到文本 (到数值 (标签1.标题) － 到数值 (1)) ＋ a
Ⅳ 求易语言制作一个世界时钟的源码
帮你找了一个
Ⅳ 易语言如何让标签从右向左慢慢的移动，直接给我写下来源码，时钟1 标签1
.版本
2
.
程序集
窗口程序集1
.
子程序
_时钟1_周期事件
.如果真
(标签1.左边
≥
宽度)
标签1.左边
＝
0
.如果真结束
标签1.左边
＝
标签1.左边
＋
1
.子程序
_按钮1_被单击
时钟1.时钟周期
＝
10
Ⅵ 易语言时间校正源码
网络时间校准程序：------------------------------------------------------------------.版本 2
.支持库 INTERNET.子程序 _按钮1_被单击
.局部变量 网页文本, 文本型
.局部变量 文本数组, 文本型, , "0"
.局部变量 日期临时, 文本型, , "0"
.局部变量 时间临时, 文本型, , "0"
.局部变量 时间, 文本型标签1.标题 ＝ “取网络时间进行中...”
处理事件 ()
网页文本 ＝ 到文本 (HTTP读文件 (“ http://www.time.ac.cn/stime.asp”))
文本数组 ＝ 分割文本 (网页文本, “服务器时间:”, )
.如果真 (取数组成员数 (文本数组) ＜ 2)
信息框 (“取网络时间失败！链接网络不成功！”, 0 ＋ #信息图标, “网络校时：”)
标签1.标题 ＝ “取网络时间失败！”
返回 ()
.如果真结束
网页文本 ＝ 文本数组 [2]
文本数组 ＝ 分割文本 (网页文本, “document.write('”, )
.如果真 (取数组成员数 (文本数组) ＜ 2)
信息框 (“取网络时间失败！链接网络不成功！”, 0 ＋ #信息图标, “网络校时：”)
标签1.标题 ＝ “取网络时间失败！”
返回 ()
.如果真结束
日期临时 ＝ 分割文本 (文本数组 [3], “')”, )
时间 ＝ 日期临时 [1]
日期临时 ＝ 分割文本 (文本数组 [6], “var hrs = ”, )
时间临时 ＝ 分割文本 (日期临时 [2], “;”, )
时间 ＝ 时间 ＋ 时间临时 [1] ＋ “时”
日期临时 ＝ 分割文本 (文本数组 [6], “var min = ”, )
时间临时 ＝ 分割文本 (日期临时 [2], “;”, )
时间 ＝ 时间 ＋ 时间临时 [1] ＋ “分”
日期临时 ＝ 分割文本 (文本数组 [6], “var szec = ”, )
时间临时 ＝ 分割文本 (日期临时 [2], “;”, )
时间 ＝ 时间 ＋ 时间临时 [1] ＋ “秒”
标签1.标题 ＝ “现在的网络时间是：” ＋ 时间
.如果真 (选择框1.选中 ＝ 真)
置现行时间 (到时间 (时间))
.如果真结束-----------------------------------------------------------------------------源码下载地址：http://dl.dbank.com/c0k4cbbbzf
Ⅶ 易语言程序按照时间控制源码
代码如下：
.版本
2
.支持库
spec
.程序集
窗口程序集1
.程序集变量
a,
整数型
.子程序
_按钮1_被单击
'
一个编辑框控件
'
一个时钟控件
'
/*
时钟1.时钟周期
＝
1000
'
*/
'
注意，设置的时钟周期的可以自定
'
秒=1000
毫秒=100
如此类推
.子程序
_时钟1_周期事件
a
＝
a
＋
1
调试输出
(a)
.如果
(a
＝
到数值
(编辑框1.内容))
结束
()
.否则
.如果结束
.子程序
__启动窗口_创建完毕
a
＝
0
Ⅷ 易语言时钟代码
可以呀，给时钟周期事件里的每个子程序加个判断，利用程序集变量来控制子程序是否运行，按钮事件中改变相应的变量，达到控制的目的，给你写的源码如下
在窗口中加三个标签 三个按钮 一个时钟
.版本 2
.程序集 窗口程序集1
.程序集变量 cs1, 逻辑型
.程序集变量 cs2, 逻辑型
.程序集变量 cs3, 逻辑型
.子程序 _按钮1_被单击
时钟1.时钟周期 ＝ 100
cs1 ＝ 取反 (cs1)
.判断开始 (cs1 ＝ 真)
按钮1.标题 ＝ “停止”
.默认
按钮1.标题 ＝ “运行”
.判断结束
.子程序 _按钮2_被单击
时钟1.时钟周期 ＝ 100
cs2 ＝ 取反 (cs2)
.判断开始 (cs2 ＝ 真)
按钮2.标题 ＝ “停止”
.默认
按钮2.标题 ＝ “运行”
.判断结束
.子程序 _按钮3_被单击
时钟1.时钟周期 ＝ 100
cs3 ＝ 取反 (cs3)
.判断开始 (cs3 ＝ 真)
按钮3.标题 ＝ “停止”
.默认
按钮3.标题 ＝ “运行”
.判断结束
.子程序 _时钟1_周期事件
.判断开始 (cs1 ＝ 真)
子程序1 ()
.默认
.判断结束
.判断开始 (cs2 ＝ 真)
子程序2 ()
.默认
.判断结束
.判断开始 (cs3 ＝ 真)
子程序3 ()
.默认
.判断结束
.子程序 子程序1
标签1.标题 ＝ 标签1.标题 ＋ “1”
.子程序 子程序2
标签2.标题 ＝ 标签2.标题 ＋ “2”
.子程序 子程序3
标签3.标题 ＝ 标签3.标题 ＋ “3”
Ⅸ 易语言怎么写时钟代码
先设置好时钟间隔 （1000毫米=1秒） ，然后双击时钟进入时钟周期 输入命令即可
下面是写的简单历程：
.版本 2
.子程序 _按钮1_被单击
时钟1.时钟周期 ＝ 100‘原本时钟周期为0，在这里设置目的是开始增加
.子程序 _时钟1_周期事件
标签1.标题 ＝ 到文本 (到数值 (标签1.标题) ＋ 1) ’按照时钟周期，每次周期+1
打字不容易，请采纳。 还不懂得话+我Q 481326635
Ⅹ 易语言计时器源码,请帮忙看看哪里出错了.
很简单，把你时钟1的时钟周期事件下面的那3个“参数”取消。就用程序集变量：小时、分钟、秒