Results 1 to 3 of 3

Thread: Julian date converter

  1. #1

    Thread Starter
    Member
    Join Date
    Jun 2005
    Location
    Poulsbo, WA
    Posts
    60

    Julian date converter

    Does anybody know where I can find a Julian to Gregorian date converter?

  2. #2
    I'm about to be a PowerPoster! Hack's Avatar
    Join Date
    Aug 2001
    Location
    Searching for mendhak
    Posts
    58,333

    Re: Julian date converter

    Try this
    VB Code:
    1. Private Sub ConvertDateToJulian(MyDate As String)
    2. Dim JYear As Integer
    3. Dim JDate As String
    4. JYear = Right(MyDate, 1)
    5. JDate = Right(MyDate, 1) + Format(DateDiff("y", "01-Jan-" & JYear, MyDate) + 1, "0##")
    6. MsgBox JDate
    7. End Sub
    8.  
    9. Private Sub Command1_Click()
    10. ConvertDateToJulian Text1.Text
    11. End Sub

  3. #3
    PoorPoster iPrank's Avatar
    Join Date
    Oct 2005
    Location
    In a black hole
    Posts
    2,729

    Re: Julian date converter

    Convert Julian Dates to Standard Gregorian Format : http://www.vbcode.com/asp/showsn.asp?theID=1205
    Usefull VBF Threads/Posts I Found . My flickr page .
    "I love being married. It's so great to find that one special person you want to annoy for the rest of your life." - Rita Rudner


Posting Permissions

  • You may not post new threads
  • You may not post replies
  • You may not post attachments
  • You may not edit your posts
  •  



Click Here to Expand Forum to Full Width