主题：自定义函数问题

functions.execute（“函数名”，“参数1”，“参数2”，“参数3”，……）

能不能这样改成：

dim s as string=“函数名”&“，”&“参数1” &”，“&“参数2”&”，“&“参数3”，……

functions.execute（s）

好的，谢谢指点

Dim cs() As String
cs =r("参数").Split(",")'r(“参数”)里面存放函数的若干参数
Dim Names() As object                             

Dim objs As New List(Of object)
        For i As Integer =0 To cs.Length -1
                      objs.Add(cs(i))
        Next
 Names=objs.ToArray() '将集合转换为数组      
Functions.execute(“函数1”,Names)
代码执行提示错误，高手帮指点

我传递的参数是e,object型的。

函数代码是

Dim e As object = args(0)
e.sender.ShowToolTip("您好", 3000）

错误如下图

此主题相关图片如下：qq截图20160109225834.png

函数名是“提示”

Dim cs() As String cs =r("参数").Split(",")'r(“参数”)里面存放函数的若干参数 Dim Names() As object                              Dim objs As New List(Of object)         For i As Integer =0 To cs.Length -1                       objs.Add(cs(i))         Next  Names=objs.ToArray() '将集合转换为数组       Functions.execute(“提示”,Names)

下载信息  [文件大小：   下载次数： ]

点击浏览该文件:例子.zip

这是例子，请高手帮忙