sub Timer1_Timer()
    print Time$
end sub