怎么用vb做个定时器,比如说到9:00就有提示,thanks!

来源:百度知道 编辑:UC知道 时间:2024/06/30 03:20:47
我想用vb写个定时器,就和是一到某个就跳出一个窗口,提示下课了,
谢谢大家!
第一位的回答很高深,看不明白~~~

谢谢两位的回答,特别是第二位,我编译了一下,没成功!

窗体上添加一个label控件,一个Timer控件(表的形状)
TIMER控件的INTERVAL设置成1000
Private Sub Timer1_Timer()
Label1.Caption = Format(Now, "hh.mm")
If Label1.Caption = "09.00" Then
MsgBox "下课了"
End If
End Sub
这段程序可以提示“下课了”一分钟。直到时间到了9.01才停止

添加一个Timer控件,然后通过设置好它的间隔,再加入不断检查当前系统时间的代码,一旦符合条件就可以运行相应代码。

If left(time,5)="09:00" then
Msgbox "nine!"
End if

vb 本来就有一个定时器,看你怎么应用它而已

窗体上放一个定时器如timer1,定时器的刷新interval设置为1

代码如下

Private Sub Timer1_Timer()
If Time = "9:00:00" Then
MsgBox "下课了!"
End If
End Sub

用MSGBOX 如果程序不在最前你是看不到的.

最好的是弹出一个新窗体,并把该窗体置顶.

时间的判断如上就可以了.