25/11/08 18:22
Louis
Ciao,
la proprietà interval impostata a 1.000 equivale al trascorrere di 1 secondo, il resto è di conseguenza (1^ ora sessanta minuti, 1 minuto sessanta secondi).
aaa
26/11/08 14:18
GrG
Così appesantisci codice e form inutilmente...basta un timer
allora setti come interval 1000 (cioè un secondo)
esterne alla sub dichiari 3 variabili:
Dim ore as integer, minuti as integer, secondi as integer
Poi nel timer metti:
secondi = secondi + 1 'aumenta i secondi
if secondi > 60 then 'dopo 60 sec. scatta il minuto
secondi = 0 'riazzeriamo i sec.
minuti = minuti + 1'incrementiamo i minuti
end if
if minuti > 60 then 'se passano 60 min. incrementa le ore
minuti = 0 'riazzera i minuti
ore = ore + 1
end if
EDIT:
comunque un timer come massimo interval può avere 1 minuto mi pare...
Ultima modifica effettuata da GrG 26/11/08 14:19
aaa
27/11/08 10:58
tippolo
Postato originariamente da Louis:
Io non ho affermato il contrario (forse non sono stato chiaro)! Sono d'accordo con quanto evidenziato da GrG, anzi si potrebbe fare di meglio facendo riferimento all'orologio di sistema; però se si vuole seguire la strada già tracciata si potrebbe utilizzare una funzione (che in sostanza fa il lavoro indicato da GrG) che consente anche di effettuare le somme di ore e minuti. A tale scopo dà un'occhiata qui:
forum.masterdrive.it/articoli-visual-basic-6-35/calcoli-ore-minuti-26600/
Ciao !!
Ciao Louis,
non so se ti riferisci a me, comunque qui siamo tutti daccordo.
Il mio post:
65535 millisecondi per la precisione (poco più di un minuto)
era solo per precisare quanto affermava gregorio (1 minuto mi pare...)nulla di più.
Ciao
Ultima modifica effettuata da tippolo 27/11/08 10:59
aaa