user603 发表于 2012-11-6 16:12:11

如何自定义一个Function，给此过程写多个参数。但调用的时候可以省略部分参数。

这种过程怎么写啊？
看到很多系统自带的函数，有参数列表，但调用函数此有些参数可选。

user603 发表于 2012-11-6 16:27:19

回复 1# user603


    :)

WANDY 发表于 2012-11-8 10:21:23

optional 参数=默认值 使用这个。VBS没试过，这个是VBA上的方法。如果不行的话，最后一个参数用数组或Dictionary。

ws812395 发表于 2012-11-12 17:54:16

回复 1# user603


    Function hanshu(A)
Dim sum,avg
avg=0
sum=0
ArrayVbs = Split(A,"|")
For i=0 ToUBound(ArrayVbs)
sum=sum+ArrayVbs(i)
avg=sum/UBound(ArrayVbs)
Next
MsgBox "和是："&sum
MsgBox "平均数是："&avg
End Function

Call hanshu("1|3|5|7|9")

jack_loo 发表于 2012-11-21 17:05:50

VBScript语言不支持函数重载，所以不行。特殊情况是动态加载javascript时通过javascript自定义函数多个同名函数。
页: [1]
查看完整版本: 如何自定义一个Function，给此过程写多个参数。但调用的时候可以省略部分参数。