Public Class Tester
Public Shared Sub Main
Try
ThrowExceptionCatchRethrow()
Catch
Console.WriteLine("Caught exception from ThrowExceptionCatchRethrow in Main")
End Try
End Sub
Public Shared Sub ThrowExceptionCatchRethrow()
Try
Console.WriteLine("In ThrowExceptionCatchRethrow")
Throw New Exception("Exception in ThrowExceptionCatchRethrow")
Catch exceptionParameter As Exception
Console.WriteLine("Message: " & exceptionParameter.Message)
Throw exceptionParameter
Finally
Console.WriteLine("Finally executed in ThrowException")
End Try
Console.WriteLine("End of ThrowExceptionCatchRethrow")
End Sub
End Class
|