Get Hours, Minutes, AND Seconds between 2 Dates (or of total seconds)
This code will enable you to take two dates, find the total seconds in between them, and calculate the Hours, Minutes, and Seconds.
AI
AI-sammanfattning: This codebase represents a historical implementation of the logic described in the metadata. Our preservation engine analyzes the structure to provide context for modern developers.
Källkod
<BR><BR>
Dim H, M, S, Secs as Long<BR>
Secs = DateDiff("s", Date1, Date2)<BR>
H = Int(Secs / 3600)<BR>
Secs = Secs - (H * 3600)<BR>
M = Int(Secs / 60)<BR>
Secs = Secs - (M * 60)<BR>
S = Secs<BR>
MsgBox Format(H, "00") & ":" & _<BR>
Format(M, "00") & ":" & _<BR>
Format(S, "00")
Originalkommentarer (3)
Återställd från Wayback Machine