codice:
        Public Shared Function JulianToDateTime(ByVal julianDate As Integer) As DateTime
            Dim RealJulian As Integer = julianDate + 1900000
            Dim Year As Integer = Convert.ToInt32(RealJulian.ToString().Substring(0, 4))
            Dim DoY As Integer = Convert.ToInt32(RealJulian.ToString().Substring(4))
            Dim dtOut As New DateTime(Year, 1, 1)
            Return dtOut.AddDays(DoY - 1)
        End Function
Dovrebbe convertire una data Jiulian in Date.

Ma da un input 2452355 (int) mi restituisce 12/20/4352 :master:

Qualcuno è in possesso di un altro algoritmo ? Oppure...dove sbaglio ?