动态管理函数
普通用户可以忽略本节内容。
Functions不仅可以用来执行自定义函数,还可以动态管理函数。
Functions提供了下述方法管理函数:
- Add
增加自定义函数。
语法:
Add(Name,Code)
Name:函数名称
Code:代码
- Remove
删除用Add方法增加的自定义函数,通过系统菜单定义的函数,是无法删除的。
语法:
Remove(Name)
Name:要删除的函数名称
- Complie
重新编译函数。
增加或删除函数后,必须执行此方法才能生效。
编译函数是需要时间的,所以动态函数一般用于对性能要求不高,但是对灵活性要求很高的场合。
我们的建议是尽量不要使用动态函数,而应该事先定义好函数。
示例
下面的代码定义了一个简单的Sum函数:
Dim
Code
As string
Code =
"Dim Val1 As Integer = 1"
&
vbcrlf
Code =
Code
&
"Dim Val2 As Integer = 2"
&
vbcrlf
Code =
Code
&
"Dim Sum As Integer = Val1 + Val2"
&
vbcrlf
Code =
Code
&
"Return Sum"
Functions.Add("Sum",Code)
Functions.Complie()
这样我们就可以在其余地方调用此函数:
Functions.Execute("Sum")
本页地址:http://www.foxtable.com/webhelp/topics/1487.htm