Sub Timer1_Timer()
    Print Time
End Sub