vba - procedimientos - parametros opcionales c#

VB: ¿cómo pruebo si se proporcionan o no argumentos opcionales?

Question

¿Cómo pruebo si se proporcionan o no argumentos opcionales? - en VB6 / VBA

Function func (Optional ByRef arg As Variant = Nothing)

    If arg Is Nothing Then   <----- run-time error 424 "object required"
        MsgBox "NOT SENT"
    End If

End Function 

Answer 1

Con una variante usaría la función NZ :

Function func (Optional ByRef arg As Variant = Nothing)
    If nz ( arg, 0 ) = 0 Then
        MsgBox "NOT SENT"
    End If
End Function 

También se puede usar con otros tipos de datos, solo tenga en cuenta que Cero cuenta como nulo o de longitud cero, por lo que nz(0,"") aún devuelve 0.

Answer 2

Puede usar la función IsMissing (). Pero este solo funciona con el tipo de datos Variant.

Answer 3

Puedes usar algo como:

function func(optional vNum as integer:=&HFFFF) ''&HFFFF value that is NEVER set on vNum

If vNum = &HFFFF Then
    MsgBox "NOT SENT"
End If

End Function

Answer 4

Si IsMissing (arg) Entonces ...

Answer 5

Si está utilizando una cadena o una variable numérica, puede verificar el valor de la variable. Por ejemplo:

Function func (Optional Str as String, Optional Num as Integer)

If Str = "" Then
    MsgBox "NOT SENT"
End If

If Num = 0 Then
    MsgBox "NOT SENT"
End If

End Function

Esto le permite usar variables no variantes.

Answer 6

Use IsMissing :

If IsMissing(arg) Then
    MsgBox "Parameter arg not passed"
End If

Sin embargo, si recuerdo correctamente, esto no funciona cuando se da un valor predeterminado para el argumento, y en cualquier caso hace que usar el argumento predeterminado sea bastante redundante.