很多程序员都没有认识到“在函数本身中使用函数名”的妙处,这就象对待一个局部变量一样。应用这个技巧可以起到临时变量的作用,有时还能加速程序运行。看看下面的代码:
FunctionMax(arr()AsLong)AsLong
DimresAsLong,iAsLong
res=arr(LBound(arr))
Fori=LBound(arr) 1ToUBound(arr)
Ifarr(i)>resThenres=arr(i)
Next
Max=res
EndFunction
去掉res变量,使用函数名称本身这个局部变量,可以使程序更加简练:
FunctionMax(arr()AsLong)AsLong
DimiAsLong
Max=arr(LBound(arr))
Fori=LBound(arr) 1ToUBound(arr)
Ifarr(i)>MaxThenMax=arr(i)
Next
EndFunction->