在.NET(Java也适用的）环境下，如何执行字符串所代表方法名（函数名）

必须用到反射，加载System.Reflection

Imports System
Imports System.Reflection

Public Class Form1

    Private Sub Form1_Load(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles MyBase.Load

        Dim MyObject As New Form1()

        Dim myType As Type = MyObject.GetType()       
        Dim mi2 As MethodInfo = myType.GetMethod("Test")

        mi2.Invoke(Me, New Object() {"TestABC"})

        Dim mi3 As MethodInfo = myType.GetMethod("Test2")
        mi3.Invoke(Me, New Object() {"ABC"})
        Dim str As String = CType(mi3.Invoke(Me, New Object() {"TestABC"}), String)
        MessageBox.Show(str)
    End Sub

    Public Sub Test(ByVal a As String)
        MessageBox.Show(a.ToString)
    End Sub

    Public Function Test2(ByVal a As String) As String
        Return a + " Test"
    End Function
End Class

 

执行结果分别为显示 TestABC与ABCTest，实现所需要的功能。