Vai al contenuto

Tramite la libreria Timer è possibile ripetere 4 volte al secondo la visualizzazione dei secondi attuali.

secondi

Timer.Interval=250
Timer.Tick    =VISUALIZZA1

Sub VISUALIZZA1
   TextWindow.Write(Clock.Second + " ")
EndSub

Potrebbe essere utile sapere quanti secondi sono passati dall’inizio dell’esecuzione del programma

Timer.Interval=250
Timer.Tick    =VISUALIZZA2
INIZIO        =Clock.ElapsedMilliseconds

Sub VISUALIZZA2
   adesso=Clock.ElapsedMilliseconds
   tempo =Math.Floor((adesso-INIZIO)/1000)

   TextWindow.Write(tempo + " ")
EndSub

Lascia un commento

Il tuo indirizzo email non sarà pubblicato. I campi obbligatori sono contrassegnati *

Questo sito usa Akismet per ridurre lo spam. Scopri come i tuoi dati vengono elaborati.