Come calcolare la data e ora differenza in ore e minuti in VBA

June 22

Come calcolare la data e ora differenza in ore e minuti in VBA


Visual Basic calcola date utilizzando la struttura del DateTime. DateTime memorizza variabili un tempo in termini di anno, mese e giorno, la sua ora, minuti e secondi e anche i suoi millisecondi. Un comando che agisce su variabili DateTime, la funzione DateDiff, calcola la differenza tra i due tempi. Esso restituisce la differenza in termini di qualsiasi intervallo specificato, compresi i giorni e gli anni o ore e minuti.

istruzione

1 Digitare la seguente riga di codice nel vostro programma:

Dim firstDateTime come nuovo System.DateTime (2012, 12, 21, 13, 04, 0, 00, cal)

2 Sostituire "2012" in linea con l'anno del tempo precedente.

3 Sostituire "12" con il numero corrispondente mese del tempo, con "1" che rappresenta gennaio "2" rappresentano febbraio, e così via.

4 Sostituire "21" con la data del giorno. "11 dicembre", per esempio, si tradurrebbe come "11."

5 Sostituire "13" con l'ora del tempo, utilizzando un orologio di 24 ore; "8:30", per esempio, si traduce come "20."

6 Sostituire "05" con verbale del tempo; "8:30", per esempio, si traduce come "30."

7 Digitare, sotto la prima riga:

Dim secondDateTime come nuovo System.DateTime (2012, 12, 21, 13, 04, 0, 00, cal)

8 Inserire la data successiva e l'ora nella riga di codice nello stesso modo.

9 Digitare il seguente codice successivo:

msg = "Differenza tra i tempi:" & DateDiff (DateInterval.Hour, firstDate, secondDate) e "ore e" & (DateDiff (DateInterval.Minute, firstDate, secondDate) - DateDiff (DateInterval.Hour, firstDate, secondDate)) & " minuti"

MsgBox (msg)