下面的代码定义了一个简单的Sum函数：
Dim Code As stringCode = "Dim Val1 As Integer = 1" & vbcrlfCode = Code & "Dim Val2 As Integer = 2" & vbcrlfCode = Code & "Dim Sum As Integer = Val1 + Val2" & vbcrlfCode = Code & "Return Sum"Functions.Add("Sum",Code)Functions.Complie()
这样我们就可以在其余地方调用此函数：
Functions.Execute("Sum")
这是帮助文档的自定义函数 结果提示 具有相同的项 错误代码：自定义函数SUM
不太懂 刚学。。。。。。。
加好友 
发短信
Post By：2019/1/27 21:43:00 [显示全部帖子]
