写一个vbs函数怎么样设置函数的参数默认值？

Question

写一个vbs函数怎么样设置函数的参数默认值
举一个例子也行？

Answer 1

1。可选参数
Function A(A0 AS integer,Optional A1 As integer=1) as boolean
end function
‘optional 必须在非可选参数的后面
2。Function A(A0 AS integer，A1 AS STRING ) as boolean
   IF A0=0 THEN A0=1
   IF A1="" THEN A1="YOUR VALUE"
end function

Answer 2

如果是Sub怎么写，也一样是吗？

Answer 3

描述
返回基于 0 的一维数组，其中包含指定数目的子字符串。
语法
Split(expression[, delimiter[, count[, start]]])难道vbs没有提供参数默认值的功能，
不应该吧，但是它提供的库函数好像可以呀，
像replace,Split等等

Answer 4

Public functin FunA(A as string,Optional B as integer=0) as boolean
    ....
End function