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

Kiyo • • ASP • 38 阅读

我们用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.....))
这样,函数可以设置默认值,也可以省略了不必要的函数调用了...

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

版权声明：
作者：Kiyo
链接：https://www.wkiyo.cn/html/2008-01/i512.html
来源：Kiyo's space
文章版权归作者所有，未经允许请勿转载。

THE END
分享
二维码
< <上一篇
下一篇>>