[VB6] Estrarre ore e minuti da un totale minuti

[lucisetti]

Buonasera a tutti.

Ho un problema per calcolare le ore e i minuti contenute in un determinato valore.

Mi spiego meglio.

Ad esempio ho a disposizione un totale di 116 minuti, da cui devo rappresentare che si tratta di 1 ora e 56 minuti. Allo stesso modo potrebbe trattarsi di 1654 minuti.
Vorrei che qualcuno mi desse una mano a scrivere poche righe di codice in VB6 per risolvere questo mio problema.

Grazie
Lucia

[francesco_test]

il codice che segue e' scritto in vbscript ma e' facilmente adattabile per vb6:

    dim dataDiFineManutenzione,ssmmoo,giorni,ore,minuti,secondi
    dataDiFineManutenzione = DateValue("30/06/07") & Chr(32) & TimeValue("20.00.00")
    dataDiFineManutenzione = (DateDiff("s", Now, dataDiFineManutenzione))
    ssmmoo = 86400
    giorni = Fix(dataDiFineManutenzione / ssmmoo)
    dataDiFineManutenzione = dataDiFineManutenzione - (giorni * ssmmoo)
    ore = Fix(dataDiFineManutenzione / 3600)
    dataDiFineManutenzione = dataDiFineManutenzione - (ore * 3600)
    minuti = Fix(dataDiFineManutenzione / 60)
    dataDiFineManutenzione = dataDiFineManutenzione - (minuti * 60)
    secondi = dataDiFineManutenzione

[alka]

Non basta dividere i minuti per 60, per determinare le ore, e calcolare invece il resto per i minuti?

[lucisetti]

Grazie alka,

ma non riesco a capire come funziona...

[alka]

Originariamente inviato da lucisetti
ma non riesco a capire come funziona...

In che senso? Avendo il numero totale dei minuti

TotMinuti / 60 = Ore

TotMinuti Mod 60 = Minuti

Cosa ti manca? :master:

[lucisetti]

Infatti... grazie alka. Risolto.

Lucia

[francesco_test]

la soluzione che ho postato e' una soluzione generica che permette di estrarre dai giorni ai secondi, inoltre mi sembra abbastanza semplice.

[alka]

Originariamente inviato da francesco_test
la soluzione che ho postato e' una soluzione generica che permette di estrarre dai giorni ai secondi, inoltre mi sembra abbastanza semplice.

Per ottenere ore e minuti da un totale di minuti, è senz'altro più semplice calcolare il risultato di una divisione intera e il suo resto.