Wie das Datum & Zeitdifferenz in Stunden & Minuten in VBA berechnen

Visual Basic berechnet Datumsangaben mithilfe der DateTime-Struktur. Eine DateTime-Variable speichert eine Zeit im Hinblick auf seine Jahr, Monat und Tag, die Stunde, Minute und Sekunde und sogar seine Millisekunden. Ein Befehl, der auf DateTime-Variablen, die DateDiff-Funktion berechnet die Differenz zwischen den beiden Zeitangaben. Dieser Unterschied in Bezug auf welches Intervall, die Sie angeben, einschließlich Minuten oder Stunden, Tagen und Jahren, zurückgegeben.

Anweisungen

1 Geben Sie die folgende Codezeile in Ihrem Programm:

Dim FirstDateTime neue System.DateTime(2012, 12, 21, 13, 04, 0, 00, cal)

2 Ersetzen Sie mit der früheren Zeit Jahr "2012" in der Zeile.

3 Ersetzen Sie "12" entsprechende mit der Zeit Monat, mit "1", Januar, "2", Februar darstellt darstellt, und so weiter.

4 Ersetzen Sie "21" mit dem Datum des Tages. "11. Dezember," würde beispielsweise als "11." übersetzen

5 Ersetzen Sie "13" mit der Zeit Stunde im 24-Stunden-Format; "20:30," bedeutet übersetzt etwa "20."

6 Ersetzen Sie "05" mit der Zeit Minuten; "20:30," bedeutet übersetzt etwa "30."

7 Geben Sie unterhalb der ersten Zeile:

Dim SecondDateTime neue System.DateTime(2012, 12, 21, 13, 04, 0, 00, cal)

8 Legen Sie die späteren Datum und Uhrzeit in die Codezeile in der gleichen Weise.

9 Geben Sie anschließend den folgenden Code:

msg = "Differenz zwischen Zeiten:" & DateDiff (DateInterval.Hour, FirstDate, SecondDate) & "Stunden und" & (DateDiff (DateInterval.Minute, FirstDate, SecondDate) - DateDiff (DateInterval.Hour, FirstDate, SecondDate)) & "Minuten"

MsgBox(msg)