codice:
Dim st As New StackTrace()
Console.WriteLine(st.GetFrame(1).GetMethod().Name)