这个vb程序哪里出现了错误？

来源：百度知道编辑：UC知道时间：2024/05/26 12:19:32

Private Sub Form_Load()
Timer1.Interval = 1000
End Sub

Private Sub Timer1_Timer()

Cls

t = CDate(Time)

tt = DateDiff("n", t, "1：00: 00")
If tt <= 8 And tt >= 1 Then
MsgBox "888666！:)"
End If
End Sub

我想让这个程序一到2----9点，就跳出888666这个对话框
怎么到了这个时间也出不来呢？
谢谢啦
我想让这个程序一运行到系统时间为2点到9点之间，就跳出“888666”这个框

没看明白，如果你要判断的话可以用：
Private Sub Form_Load()
Timer1.Interval = 1000
Timer1.Enable=True
End Sub

Private Sub Timer1_Timer()
dim t as string
t=Time
if(int(left(t,1))>=2)then
"你的语句"
endif
end sub

timer1什么时候开始?
没有开始啊老大
Private Sub Form_Load()
Timer1.Interval = 1000
timer1.start()
End Sub

这个vb程序哪里出现了错误？这个VB程序哪里出错了 vb 程序出现错误:缺少语句结束 mmc.exe是什么？这个程序出现错误了，怎么办啊？大家帮我看看这个VB程序哪里错了 VB程序,哪里错了`` VB程序哪里错了 VB中的这个程序错在哪里? 求助！！这个vb程序错在哪里？？高手赐教，请问这个VB程序有什么错误？