如何让界面时间与系统时间同步
现在只是用now函数获取时间，但是当界面不动时，时间久一直不变，跟系统时间不同步，有其他的办法吗
2013-05-06 10:25
2013-05-06 10:51
2013-05-06 15:18
2013-05-06 15:25
2013-05-06 16:27
2013-05-06 16:28
2013-05-07 07:07
2013-05-07 20:27
程序代码：
Option Explicit
Private Sub Form_Load()
Timer1.Enabled = True
Timer1.Interval = 1000
End Sub
Private Sub Timer1_Timer()
Me.Caption = Now
End Sub
2013-05-08 20:43
2013-05-09 07:35