JulianDay
(XAPI2000)
Deklaration VB 6.0
Function JulianDay (ByVal DateVal As Date) As Long
Deklaration VB.NET
Function JulianDay (ByVal DateVal As Date) As Integer
Beskrivning
Omvandlar datumet DateVal till ett julianskt dagtal,
som funktionen sedan returnerar.
Julianska dagtal är en löpande
numrering av dagar med början den 1:a januari år 4713 f kr. T ex
har den 1:a januari år 1992 dagtalet 2448623. Julianska dagtal utnyttjas
i första hand av astronomer, men är mycket användbara vid beräkningar
med datum, då sådana beräkningar annars kan vara mycket komplicerade.
De flesta av datumrutinerna i VB Super Library omvandlar
först datumen till julianska dagtal innan några beräkningar utförs.
Returvärden
Funktionen returnerar ett julianskt dagtal för det specificerade
datumet. Är datumet felaktigt returnerar funktionen 0.
Se även
JulianDayNow,
JulianToDate |
|