VB.Net by API/System/ArgumentException

ArgumentException.Message

<source lang="vbnet">

Option Strict On Public Module Tester

  Public Sub Main()
     Try
        RoutineA()
     Catch e As Exception
        Console.WriteLIne("Main error handler: " & e.Message)
     End Try
  End Sub
  Private Sub RoutineA()
     Try
        Throw New ApplicationException
     Catch e As ApplicationException
        Console.WriteLine("Exception in RoutineA: " & e.Message)
     End Try
     Try
        Throw New ArgumentException
     Catch e As ApplicationException
        Console.WriteLine("Exception in RoutineA: " & e.Message)
     End Try
     Console.WriteLine("About to exit RoutineA.")
  End Sub

End Module

 </source>