DTPicker 中时分秒为什么一直不刷新呢,该如何解决

DTPicker 中时分秒为什么一直不刷新呢
我把睡觉改为了当前时间，但是 每次 MsgBox DTPicker1.Value 都是一个固定的时分秒，为什么不更新时间呢，求解，谢谢

------解决方案--------------------
嗯，本来就是这样。除非你用定时器不断刷新。
------解决方案--------------------

VB code

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

Private Sub Timer1_Timer()
    DTPicker1.Value = Now
End Sub