zcl119 发表于 2024-6-25 11:24:07

我发一个易语言闹钟的源码，是从其他地方看到的搬运

源码名称：
易语言闹钟




源码截图：

.程序集 窗口程序集_启动窗口

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

_启动窗口.标题 ＝ “闹钟 现行时间：” ＋ 到文本 (取现行时间 ())


.子程序 _按钮启动_被单击

时钟2.时钟周期 ＝ 100
标签4.标题 ＝ “提示：已启动定时！”


.子程序 _按钮关闭_被单击

时钟2.时钟周期 ＝ 0
标签4.标题 ＝ “提示：定时已经关闭！！”
停止播放 ()



.子程序 _时钟2_周期事件
.局部变量 闹钟时间, 日期时间型

闹钟时间 ＝ 指定时间 (取年份 (取现行时间 ()), 取月份 (取现行时间 ()), 取日 (取现行时间 ()), 到整数 (编辑框时.内容), 到整数 (编辑框分.内容), 到整数 (编辑框秒.内容))
.如果真 (闹钟时间 ＝ 取现行时间 ())
    标签4.标题 ＝ “时间到了，moving！！！”
    播放MP3 (-1, “C:\Users\Administrator\Desktop\开场音乐.mp3”)
    时钟2.时钟周期 ＝ 0
.如果真结束




源码下载（下面三个下载地址，请选择一个网盘下载）：


蓝奏下载：

百度网盘：

微云下载：

bingqer 发表于 2024-7-25 20:58:53

怎么用不成呢

af20110 发表于 2024-8-8 20:37:01

uuuuuuuuuuuuuuuuuuuuuuuuuuuu

zcl119 发表于 2024-8-31 22:19:28

抱歉，可能里面有模块，不全是系统基础指令吧

KunmingCai 发表于 2024-11-9 19:29:47

有人知道这里的vip怎么开吗

huahua2416 发表于 2024-11-17 15:38:19

还不错哦

huangze29 发表于 2024-12-8 12:40:32

非常3d非常好，但是用不了

qq624470 发表于 2025-1-3 19:52:26

bingqer 发表于 2024-7-25 20:58
怎么用不成呢

.版本 2

.子程序 _按钮1_被单击

_时钟1_周期事件 ()

.子程序 _时钟1_周期事件
.局部变量 a, 日期时间型

时钟1.时钟周期 ＝ 1000
a ＝ 指定时间 (到整数 (编辑框1.内容), 到整数 (编辑框2.内容), 到整数 (编辑框3.内容), 到整数 (编辑框4.内容), 到整数 (编辑框5.内容), 到整数 (编辑框6.内容))
.如果真 (取现行时间 () ＝ a)
    信息框 (“该起床了”, 0, , )
.如果真结束

页: [1]
查看完整版本: 我发一个易语言闹钟的源码，是从其他地方看到的搬运