VB.Net Tutorial/Development/StackTrace — различия между версиями
Admin (обсуждение | вклад) м (1 версия) |
(нет различий)
|
Текущая версия на 15:53, 26 мая 2010
Print Stack TraceImports System.Diagnostics
<source lang="vbnet">public class Test
public Shared Sub Main CalculateEmployeeSalaries() End Sub Private Shared Sub CalculateEmployeeSalaries() CheckVacationPay() End Sub Private Shared Sub CheckVacationPay() ShowCallStack() End Sub
Private Shared Sub ShowCallStack() Dim stack_trace As New System.Diagnostics.StackTrace(True) For i As Integer = 0 To stack_trace.FrameCount - 1 With stack_trace.GetFrame(i) Console.WriteLine("Method: " & .GetMethod().ToString) Console.WriteLine("File: " & .GetFileName()) Console.WriteLine("Line: " & .GetFileLineNumber()) End With Next i End Sub
End class</source>
Method: Void ShowCallStack() File: Line: 0 Method: Void Main() File: Line: 0