VB.NET如何得到调用当前过程的方法名称和类名称

　　本教程为大家介绍如何得到调用当前过程的方法名称和类名称。

　　本文讲述(VB 2008, VB 2005) 如何得到调用当前过程的方法名称(Calling method)和类(Calling Class) 的名称。

　　主要用到 System.Diagnostics.StackTrace 和 System.Diagnostics.StackFrame，以及 StackFrame的方法：GetFileName，GetFileLineNumber，GetMethod.Name， GetMethod.ReflectedType.Name。

　　示例代码

　　如下面示例代码所示，我们有两个类：Class1 和 Class2 ，Class1 的有一个方法(method)叫 LoadXmlFile调用 Class2 的 WriteToFile 方法。

Imports System.Xml
Public Class Class1
    Public Sub LoadXmlFile()
        Dim filePath As String = "C:\a.xml"
　　        Dim xdoc As New Xml.XmlDocument
        Try
　　            xdoc.Load(filePath)
　　        Catch ex As Exception
　　            Dim log As New Class2
　　            log.WriteToFile("Error. Load XML File failed")
　　        End Try
    End Sub
End Class

Imports System.Diagnostics
Public Class Class2
    Public Sub WriteToFile(ByVal Log As String)
        Dim clsName As String = ""
　　        Dim mtdName As String = ""
　　        Dim lnNo As String = ""
　　        Dim codeFilePath As String = ""
        Dim st As New StackTrace(True)
　　        If st.FrameCount > 1 Then
　　            Dim sf As StackFrame = st.GetFrame(1)
　　            mtdName = sf.GetMethod.Name
　　            Debug.WriteLine(mtdName)
            clsName = sf.GetMethod.ReflectedType.Name
　　            Debug.WriteLine(clsName)
            lnNo = sf.GetFileLineNumber.ToString
　　            Debug.WriteLine(lnNo)
            codeFilePath = sf.GetFileName
　　            Debug.WriteLine(codeFilePath)
　　        End If
    End Sub
End Class

　　在 Class2里面，我们写了一些代码得到调用它的 Class1的名称，所在文件路径，调用方法的名称，以及调用文件里执行调用的行数。

　　要点

　　1. 要 Imports System.Diagnostics。

　　2. 要用到 StackTrace (System.Diagnostics.StackTrace) 和 StackFrame (System.Diagnostics.StackFrame)。

　　3. 要用到 StackTrace.GetFrame(1)。

　　4. StackFrame.GetMethod.Name 得到调用当前过程的方法 (calling method name)。

　　5. StackFrame.GetMethod.ReflectedType.Name 得到调用当前过程的类的名称 (calling class name)。

　　6. StackFrame.GetFileLineNumber.ToString 得到调用当前过程的语句在文件里的行数。

　　7. StackFrame.GetFileName 得到调用当前过程的文件路径。