你的位置: Kiyo'Space首页 ASP 阅读文章 欢迎留下您的足迹

ASP/VB 使用可选参数的函数

[ ASP ] 分享

我们用C或者java的时候, 

function fun(a,b,c,d){
...
}

 

是可以省略后面的参数的,如funa(a,b);
函数不会出错,但是VBScript就不行了

function fun(a,b,c,d)
...
end function

 

调用 fun(a,b)会报错,参数不对

不过我们似乎可以用一个变通的方法,嗯?看下去:

 

 

Function fun_option() fun_option(optionvalue)  
Dim ParaCount,IndexValue
If Not IsArray(optionvalue) Then  
  optionvalue=Array(optionvalue)  
End If  
ParaCount=Ubound(optionvalue)  
If ParaCount>=0 then'参数1  
   IndexValue=OpionValue(0) '参数1的值
End if  
If ParaCount>=1 then'参数2  
   IndexValue=OpionValue(0) '参数2的值
End if  
If ParaCount>=2 then'参数3  
   IndexValue=OpionValue(0) '参数3的值
End if
.......
End Function

不知道大家看懂了没有
就是用数组代替了参数,在调用函数的时候,fun_option(Array(para1,para2,para3.....))
这样,函数可以设置默认值,也可以省略了不必要的函数调用了...

如果你有更好的方法,也可以补充上.


欢迎在此留下您的脚步






评论内容 (*必填):
(Ctrl + Enter 快速提交)