Date Time VB.Net

Module Example
   Public Sub Main()
      Dim duration As New TimeSpan(1, 12, 23, 62)
      Dim output As String = "Time of Travel: " + duration.ToString("c")
      Console.WriteLine(output)
      Console.WriteLine("Time of Travel: {0:c}", duration) 
   End Sub
End Module