请教一下VB6.0中过程与函数的建立问题

Temppktemp

大侠们：
　　各位好！
　　小弟了解到VB6.0中的过程Sub和函数Function是可以自己建立的，但如果建立一但可选参数的Sub或Function呢？望各位大侠们继续指点小弟！

boywhp

private sub TestSub(x as long,y as long,Optional z as long=0)

End Sub

调用时
TestSub 0,0
TestSub 0,0,1

Temppktemp

大侠：
　　555！多谢大侠指点，江湖儿女不言谢！5555555