Date Time VB.Net

Module TryParse
    Public Sub Main( )
         Dim intervalVal As TimeSpan 
         If TimeSpan.TryParse( "10.12:00", intervalVal ) Then
            Dim intervalToStr As String = intervalVal.ToString( )
            Console.WriteLine( "{0,21}", intervalToStr )
         Else
            Console.WriteLine("Parse operation failed.")
        End If
        
    End Sub 
End Module