Date functions

[mdijkens]

@mdijkens - You can do these and other date/time related things very easy with the library I posted above.
Just add to your program and calculate differences, leapyear, weekdays, daylight saving, timezones, etc.

Thank you for your hint. The key point about "DateDiff" is, how should I use that for calculations?
I know "DateDiff" from VB-Script and from Visual Basic, and there I used it for calculations in financial programs. I was able to use the result of “DateDiff” when calculating the repayment amount of loans.

Back then, I recalculated all formulas and results in all programs using a calculator, and when "DateDiff" was used, for example, it always delivered a correct result.

There can't be even the slightest mistake in finance. . . otherwise the Third World War will break out. 

To calculate date differences, you could easily do:

Code: (Select All)

 Dim As _Unsigned _Integer64 date1, date2



date1 = TIM.stamps("1917-09-24 15:52:31") 'seconds since 01-01-0001

date2 = TIM.stamp(2021, 2, 17, 10, 24, 49) 'alternative method



Print TIM.format$(date1)

Print TIM.format$(date2)

Print "Difference is"; date2 - date1; "seconds or"; (date2 - date1) / 86400; "days"



x$ = TIM.dateTime$(date2 - date1, year%, month%, day%, hour%, minute%, seconds%) ' fills vars & returns datetime without -/:

Print "Or"; year%; "years"; month%; "months"; day%; "days"; hour%; "hours"; minute%; "minutes and"; seconds%; "seconds"

End