关于日期时间比较的问题

我定时钟的interval是1000Private Sub Timer1_Timer()
    Dim PubTime As Date

    pubtime="2005-10-9 17:56:22"
            If PubTime = Now Then
          MsgBox "任务时间到"
    End IfEnd Sub但是当时间到了以后，我测试了10次，总有2或3次不能执行msgbox,这是为什么呢？
我实际上想做的是一个定时提醒功能