vb 倒计时 代码

来源：百度知道 编辑：UC知道 时间：2024/06/15 16:48:02
想用VB做一个定时器，具体要求与作用如下
输入：倒计时的时分秒。
时间到了之后声音提醒。
能够至少累计5个提醒。最好有能够删除提醒的功能。
重点是关闭了之后再打开，提醒的计时不因程序的关闭而省掉了关闭中所经历的时间。
我的想法是需要调用系统时间，但是因为对VB了解不深，很多功能都无法实现，希望高人帮忙。

PS：本来我是用的百度推荐的Multi Timer，感觉还不错，但是就是关了之后再开启倒计时会从上回的时间开始计时，因此萌发了这个念头。大家可以去参考一下那个软件。
邮箱：lxclxj@163.com
谢谢啦，能否附上源代码，我好学习一下

给个邮件，我发个我做的给你

我对你的问题得理解是这样的（你看对不对）：你知道怎么用VB做倒计时，不知道怎么得到程序关闭后上次的计时事件（和时间）
如果是这样的话，你可以做一个函数（倒计时的），在函数的开头加上读取文件数据的一段代码（如果指定文件没有数据则表示这是第一次使用这个程序），在函数的尾部加上一段写文件的代码（记录本次使用程序的情况）
读写文件的方法：Open "路径" for input|output|append as #filenumber ‘读文件 print #filenumber varname|"" ’写文件方法 input #filenumber varname|""‘读文件方法

调用系统时间语句：
时间（时/分/秒）：time
日期（年/月/日）：date
日期+时间（年/月/日/时/分/秒）：now

其他的你应该都会编了

if time =你设定的时间 then
msgbox "伙计，该休息一下的了，保护好自己的眼睛啊"
end if

把设置的时间保存为文本方式，等下次程序启动的时候自动加载

Q：451735401
没太听懂，上Q跟我说，我把文件传给你

一个笨点的办法，退出时记录系统时间到文件，下次启动读入记录的时间和当前时间作对比，要考虑到如果隔天的话还要记录日期，方法有了，代码你应该会写的吧
使用系统API函数也可以