有1个方法可以做到,你在ShowValue传入变量时顺便传入这个变量的名字
Private Function ShowValue(Byval variable As Object,ByVal variableName As String)As String
Return variableName+"="+variable.ToString
End Sub
楼上正解:
除非这样,但是变量名字不是自动取得的。
Private Function ShowValue(ByVal intVal As Integer, ByVal intName As String) As String
Return intName & " = " & intVal.ToString
End Function