Sådan Beregn Date & Time forskellen i timer og minutter i VBA

Visual Basic beregner datoer vha DateTime struktur. A DateTime variabel gemmer en tid med hensyn til år, måned og dag, dens time, minut og sekund og endda dets millisekunder. En kommando der virker på DateTime variabler, den DateDiff funktionen beregner forskellen mellem de to gange. Den returnerer denne forskel med hensyn til alt efter hvilken interval, du angiver, herunder dage og år eller timer og minutter.

Vejledning

• Skriv følgende linje kode i dit program: Dim firstDateTime som ny System.DateTime (2012, 12, 21, 13, 04, 0, 00, cal)

• Udskift "2012" i overensstemmelse med den tidligere tidens året.

• Sæt "12" med det nummer, der svarer til tidens måned, med "1" repræsenterer januar "2" repræsenterer februar og så videre.

• Sæt "21" med dags dato. "11 December," for eksempel ville oversætte som "11."

• Sæt "13" med tidens time ved hjælp af en 24-timers ur; "08:30", for eksempel, kan oversættes til "20."

• Erstat "05" med tidens minutter; "08:30", for eksempel, kan oversættes til "30."

• Type, under den første linje: Dim secondDateTime som ny System.DateTime (2012, 12, 21, 13, 04, 0, 00, cal)

• Sæt senere dato og tid i linje kode på samme måde.

• Indtast følgende kode næste: msg = "Forskel mellem gange:" & DateDiff (DateInterval.Hour, først Dato, anden dato) & "timer og" & (DateDiff (DateInterval.Minute, første date, anden dato) - DateDiff ( DateInterval.Hour, først Dato, anden dato)) & "minutter" MsgBox (msg)