现在的情况是当输出GOOD时,系统时间不再更新

Private Sub Command6_Click()
MsgBox "GOOD"
End Sub

Private Sub Timer1_Timer(Index As Integer)

Label3.Caption = Now

End Sub