提供可选参数的缺省值
也可以给可选参数指定缺省值。在下例中,如果未将可选参数传递到函数过程,则返回一个缺省值。
SubListText(xAsString,OptionalyAs_
Integer=12345)
List1.AddItemx
List1.AddItemy
EndSub
PrivateSubCommand1_Click()
strName="yourname" '未提供第二个参数。
CallListText(strName) '添加“yourname”和“12345”。
EndSub
使用不定数量的参数一般说来,过程调用中的参数个数应等于过程说明的参数个数。可用ParamArray关键字指明,过程将接受任意个数的参数。于是可以这样来编写计算总和的Sum函数:
DimxAsInteger
DimyAsInteger
DimintSumAsInteger
SubSum(ParamArrayintNums())...[ 查看全文 ]