Imports System

Public Module Module1

    Function ConvertTimestamp(ByVal timestamp as Double) As DateTime

        Return New DateTime(1970, 1, 1, 0, 0, 0).AddSeconds(timestamp).ToLocalTime()

    End Function

    Public Sub Main()

        Console.WriteLine(ConvertTimestamp(1461943621))

    End Sub

End Module