
DisplayExceptionInfo – Displaying error information
‘ A reusable routine that displays error information’ Note: requires Imports System.ReflectionSub DisplayExceptionInfo(ByVal e As Exception) ‘ Display the error message. Console.WriteLine(e.Message) Dim st As New StackTrace(e, True) Dim i As Integer For i = 0 To st.FrameCount – 1 ‘ Get the i-th stack frame. Dim sf As StackFrame