max是比较2个数吧,帮助中有个用自定义函数的例子
增加一个自定义函数,名称为Max,代码为:
Dim MaxVal As
Double = Args(0)
For i As
Integer
= 1
To
Args.Length - 1
MaxVal = Math.Max(MaxVal,Args(i))
Next
Return MaxVal
该自定义函数可以比较任意个数的参数,并返回最大的一个,例如在命令窗口执行:
Output.Show(Functions.Execute("Max",1,3,5,7,9))
即可显示1、3、5、7、9几个数值中的最大数9。
希望对你有用~!