VB 时间触发事件的问题

来源：百度知道 编辑：UC知道 时间：2024/05/22 18:40:16
我想到实现这样的要求：到了8点就弹出一个图片，10：30就弹出另外一个图片。。在图片上我想写着要干的事情。。。
如果有源码，送积分啊！！！！
谢谢大家啦

private timer1()_timer
dim timenow as integer,timeset1 as integer,timeset2 as integer
const timeset1=8*3600'表示8点
const timeset2=10.5*3600
do until timeset1=timenow
timenow=timer
loop
msgbox("something you want to say")
picture1.picture=......
do until timeset2=timenow
loop
msgbox("something you want to say")
picture1.picture=......
end sub

VB里有一个Timer控件，可以实现你要的功能
把Interval设置为1000，这样
Timer1_Timer就会每秒执行一次。

对``

用timer就可以实现

具体方法不难,LZ应该会吧