Development VB.Net

Class Sample
   Public Shared Sub Main()
        Dim values() As String = { "One", "1.34e28", "-26.87", "-18", "-6.00", _
                                   " 0", "1601.9", Int32.MaxValue.ToString() }
        Dim result As UInteger
        
        For Each value As String In values
           Try
              result = Convert.ToUInt32(value)
              Console.WriteLine(result)
           Catch e As Exception
              Console.WriteLine("Exception")
           End Try   
        Next                                 
    End Sub 
End Class