请求大侠帮忙~~
在VB中timer怎么实现在特定的时间触发事件`~比如在2007.10.01 12:00:00播放歌曲

Private Sub Timer1_Timer()
Label1.Caption = Time
If Label1.Caption >= "12:00:00" Then
.......播放歌曲
End If
End Sub
年月日用Date

首先要做的是 提取你所需要的时间出来！

2是要加个判断 如果到了你规定的时间 那么播放音乐

LZ 的时间为：
2007.10.01 12:00:00

提取 年： year(date)
月：monch（date）
日： day(date)
时间：time()
判断：
If Year(Date) = 2007 And Month(Date) = 10 And Day(Date) = 1 And Time() = "12:00:00" Then播放音乐

Form1.Caption = Time + Date

If Year(Date) = 2007 And Month(Date) = 6 And Day(Date) = 16 And Time() = "03:30:17" Then
MsgBox "asda"
End If
怎么实现不了???

Private Sub Timer1_Timer()
Label1 = Date
Label2 = Time & ":" & Format((Timer - Int(Timer)) * 1000, "000")
If lbFix = True Then
If DateDiff("n", Now, CDate(Date & " " & txtHour & ":" & txtMinter)) = 0 Then
shutWindows
End If
Debug.Print DateDiff("n", Now, CDate(Date & " " & txtHour & ":" & txtMinter))
End If
End Sub
跟这个类似

?????
大侠们`~
怎么不说话了啊`~

谢谢5楼的大侠`~
我去研究哈`~

再给你一个够你用了吧？
Private Sub Timer1_Timer()
Label1.Caption = Date + Time
If Label1.Caption >= "2007-10-1 12:00:00" Then
..............
End If
End Sub

哈哈~~`
谢谢斑竹~~