Значение по умолчанию для параметров функции в VB6

Question

Как указать значение по умолчанию для параметра в VB6?

Answer 1

Private Sub SomeSub(Optional SomeParam As Integer = 0)
    ' blah
End Sub