Imports System
Public Class TimeInMillisecondsToNumberOfYears_VB_NET
Public Shared Sub Main(ByVal args As String())
Dim dateTimeOffset As DateTimeOffset = DateTimeOffset.FromUnixTimeMilliseconds(1476907455894L)
Dim totalYears As Single = dateTimeOffset.Year - 1970
Console.WriteLine(totalYears)
Dim year As Integer = dateTimeOffset.Year
Console.WriteLine(year)
End Sub
End Class
' run:
'
' 46
' 2016
'