The following is a chunk of code to see if formatting his maintained:
Private Sub GetCurrentMethodName()
Dim sfFrame As StackFrame = New StackFrame()
Dim mbMethod As MethodBase = sfFrame.GetMethod()
MessageBox.Show(mbMethod.Name)
End Sub
Hopefully this works!