Как узнать, опущен ли параметр при вызове функции? - VB

Формулировка задачи:

Есть ли способ, если вызов происходит по значению?

sub main()
  foo 0&
  foo
end sub
 
function foo(optional p&)
 
end function

Решение задачи: «Как узнать, опущен ли параметр при вызове функции?»

textual
                            Листинг программы 
                        

                            Const TRICKY_VALUE& = 1415926535
 
Sub main()
  foo 0&
  foo
End Sub
 
Function foo(Optional p& = TRICKY_VALUE)
  If p = TRICKY_VALUE Then
    MsgBox "параметр опущен"
  Else
    MsgBox "p=" & p
  End If
End Function
                        

Оцени полезность:

12 голосов , оценка 4.083 из 5

Похожие ответы