Imports System
Public Class Program
Public Shared Sub Main()
Dim timespan As TimeSpan = TimeSpan.FromMilliseconds(1073589847485)
Dim dt As DateTime = New DateTime(1970, 1, 1) + timespan
Console.Write(dt)
End Sub
End Class
' run:
'
' 1/8/2004 7:24:07 PM
'