利用易语言做一个定时开关机
易语言定时开关机程序
下面是一个使用易语言编写的定时开关机程序的示例代码。这个程序允许用户设置定时关机和定时开机的时间。
150套易语言教学课程：https://download.csdn.net/download/dhyuan_88/91250330
.版本 2
.程序集 窗口程序集_启动窗口
.程序集变量 关机时间, 日期时间型
.程序集变量 开机时间, 日期时间型
.子程序 __启动窗口_创建完毕
时钟1.时钟周期 ＝ 1000 ' 每秒检查一次
标签_当前时间.标题 ＝ "当前时间: " ＋ 到文本 (取现行时间 ())
.子程序 _按钮_设置关机_被单击
.局部变量 小时, 整数型
.局部变量 分钟, 整数型
小时 ＝ 到数值 (编辑框_关机小时.内容)
分钟 ＝ 到数值 (编辑框_关机分钟.内容)
.如果真 (小时 ＜ 0 或 小时 ＞ 23 或 分钟 ＜ 0 或 分钟 ＞ 59)
信息框 ("请输入有效的时间!", 0, , )
返回
.如果真结束
关机时间 ＝ 到时间 (取日期 (取现行时间 ()) ＋ " " ＋ 到文本 (小时) ＋ ":" ＋ 到文本 (分钟) ＋ ":00")
标签_关机时间.标题 ＝ "定时关机时间: " ＋ 到文本 (关机时间)
信息框 ("定时关机设置成功!", 0, , )
.子程序 _按钮_设置开机_被单击
.局部变量 小时, 整数型
.局部变量 分钟, 整数型
小时 ＝ 到数值 (编辑框_开机小时.内容)
分钟 ＝ 到数值 (编辑框_开机分钟.内容)
.如果真 (小时 ＜ 0 或 小时 ＞ 23 或 分钟 ＜ 0 或 分钟 ＞ 59)
信息框 ("请输入有效的时间!", 0, , )
返回
.如果真结束
开机时间 ＝ 到时间 (取日期 (取现行时间 ()) ＋ " " ＋ 到文本 (小时) ＋ ":" ＋ 到文本 (分钟) ＋ ":00")
标签_开机时间.标题 ＝ "定时开机时间: " ＋ 到文本 (开机时间)
信息框 ("定时开机设置成功!", 0, , )
.子程序 _时钟1_周期事件
.局部变量 当前时间, 日期时间型
当前时间 ＝ 取现行时间 ()
标签_当前时间.标题 ＝ "当前时间: " ＋ 到文本 (当前时间)
' 检查是否到达关机时间
.如果真 (取时间间隔 (当前时间, 关机时间, #秒) ≥ 0 且 取时间间隔 (当前时间, 关机时间, #秒) ≤ 1)
执行关机 ()
.如果真结束
' 检查是否到达开机时间
.如果真 (取时间间隔 (当前时间, 开机时间, #秒) ≥ 0 且 取时间间隔 (当前时间, 开机时间, #秒) ≤ 1)
执行开机 ()
.如果真结束
.子程序 执行关机
运行 ("shutdown -s -f -t 0", 假, ) ' 立即关机
信息框 ("系统即将关机!", 0, , )
.子程序 执行开机
' 注意: 定时开机需要BIOS支持并在BIOS中设置
信息框 ("请确保已在BIOS中设置定时开机功能!", 0, , )
.子程序 _按钮_取消关机_被单击
运行 ("shutdown -a", 假, ) ' 取消关机
信息框 ("已取消定时关机!", 0, , )
程序说明
界面设计：
需要创建两个编辑框用于输入关机的小时和分钟
另外两个编辑框用于输入开机的小时和分钟
设置按钮和取消按钮
标签用于显示当前时间、设置的关机和开机时间
功能：
可以设置定时关机时间，到达指定时间后自动关机
可以设置定时开机时间（但需要BIOS支持）
可以取消已设置的定时关机
注意事项：
定时开机功能需要主板BIOS支持，程序中只是提醒用户需要在BIOS中设置
程序需要以管理员权限运行才能执行关机操作
使用说明
在编辑框中输入小时和分钟（24小时制）
点击"设置关机"按钮设置定时关机
点击"设置开机"按钮设置定时开机（需BIOS支持）
点击"取消关机"按钮可以取消已设置的定时关机
程序会显示当前时间和已设置的时间
利用易语言做一个定时开关机