简单的问题!!!!!!!!!!!!!

上官云峰 2004-11-03 03:37:59
用Timer控件做一个时间提醒器
要求
从开始时间算起共8分钟,从第7分钟开始每隔10秒报警一次,到第8分钟的时候报长鸣
...全文
75 4 打赏 收藏 转发到动态 举报
写回复
用AI写文章
4 条回复
切换为时间正序
请发表友善的回复…
发表回复
viena 2004-11-03
  • 打赏
  • 举报
回复
时间间隔函数
DateDiff(n, time1, time2)'n表示时间间隔以分钟计

函数now取当前系统时间

API函数MessageBeep报警
莫情莫钱 2004-11-03
  • 打赏
  • 举报
回复
学习了
不错哦
viena 2004-11-03
  • 打赏
  • 举报
回复
Timer1 interval设为1000
Timer2 interval设为10000

Timer1_Timer事件里判断当前时间与起始时间间隔
若为
7分钟(datediff函数),enable Timer2
8分钟,报长鸣函数,Timer全部终止

Timer2_Timer事件里写短报警函数

开始,记下系统时间,enable Timer1

lzlbj 2004-11-03
  • 打赏
  • 举报
回复
try your best!you can do it by yourself!

1,451

社区成员

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

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