Vrátí logickou hodnotu, která označuje, jestli byl proceduře předán volitelný argument Variant .
Syntaxe
IsMissing(argname)
Povinný argument argname obsahuje název volitelného argumentu procedury typu Variant .
Poznámky
Pomocí funkce IsMissing můžete zjistit, jestli byly při volání procedury zadány volitelné argumenty varianty . Funkce IsMissing vrátí hodnotu True , pokud pro zadaný argument nebyla předána žádná hodnota. v opačném případě vrátí hodnotu False. Pokud funkce IsMissing vrátí pro argument hodnotu True , může použití chybějícího argumentu v jiném kódu způsobit chybu definovanou uživatelem. Pokud se v argumentu ParamArray použije funkce IsMissing, vrátí se vždy hodnota False. Pokud chcete zjistit prázdnou hodnotu ParamArray, otestujte, jestli je horní mez pole menší než dolní mez.
Poznámka
IsMissing nefunguje u jednoduchých datových typů (například Integer nebo Double), protože na rozdíl od variant nemají ustanovení pro "chybějící" bit příznaku. Z tohoto důvodu syntaxe zadaných volitelných argumentů umožňuje zadat výchozí hodnotu. Pokud je argument při volání procedury vynechán, bude mít argument tuto výchozí hodnotu, jako v následujícím příkladu:
Poznámka
Následující příklady ukazují použití této funkce v modulu VBA (Visual Basic pro Applications). Pokud chcete další informace o práci s modulem VBA, vyberte Referenční informace pro vývojáře, které najdete v rozevíracím seznamu vedle položky Hledat a do vyhledávacího pole napište požadované pojmy.
Sub MySub(Optional MyVar As String = "specialvalue")
If MyVar = "specialvalue" Then
' MyVar was omitted.
Else
...
End Sub
V mnoha případech můžete test zcela vynechat If MyVar tak, že se výchozí hodnota bude rovnat požadované hodnotě, MyVar pokud ji uživatel vynechá ve volání funkce. Díky tomu je váš kód stručnější a efektivnější.
Příklad
V tomto příkladu se funkce IsMissing používá ke kontrole, jestli byl volitelnému argumentu předán uživatelem definované proceduře. Všimněte si, že nepovinné argumenty teď můžou mít výchozí hodnoty a jiné typy než Variant.
Dim ReturnValue
' The following statements call the user-defined
' function procedure.
ReturnValue = ReturnTwice() ' Returns Null.
ReturnValue = ReturnTwice(2) ' Returns 4.
' Function procedure definition.
Function ReturnTwice(Optional A)
If IsMissing(A) Then
' If argument is missing, return a Null.
ReturnTwice = Null
Else
' If argument is present, return twice the value.
ReturnTwice = A * 2
End If
End Function