vb.net 反射如何使用

cxyttboy

源语句是result = client.VatInvoice(image, options)
调用了百度OCR的VatInvoice函数（public JObject VatInvoice(byte[] image, Dictionary<string, object> options = null)）

我在调用的时候想把函数名，VatInvoice，用变量表示，所以用反射。调试了很多次都失败，请问应该怎么改？

Dim ass As Assembly = Assembly.Load("AipSdk")
Dim ty As Type = ass.GetType("Baidu.Aip.Ocr.Ocr")
Dim dl As Object = Activator.CreateInstance(ty)
Dim fun As MethodInfo = ty.GetMethod("result.VatInvoice")
result = fun.Invoke(dl, New Object() {(image, options)}

sluojianfei

刚好最近用到了，可以借鉴一下：
'获取MoreExcelOpr_ParaMain类模块
Dim assembly As Reflection.Assembly = Reflection.Assembly.GetExecutingAssembly()
Dim mmodWIP As Type
mmodWIP = Nothing
For Each atype In assembly.GetTypes()
        If atype.Name = "MoreExcelOpr_ParaMain" Then
                mmodWIP = atype
                Exit For
        End If
Next

'Func_name是函数名称比如 Func_name="InsertRows"
'Me是需要执行的类模块，由于我的Sub InsertRows()函数就在当前模块，所以直接用了Me,可以用mmodWIP代替
If Not IsNothing(mmodWIP) Then
        Dim mi As Reflection.MethodInfo = mmodWIP.GetMethod(Func_name)
        If Not IsNothing(mi) Then
                mi.Invoke(Me, {})
        End If
End If

ww87725244

vb.net也叫类模块？