Vrne logično vrednost, ki označuje, ali je bil izbirniargument Variant podan v procedura.
Sintaksa
IsMissing( ime argumenta )
Obvezni argument ime argumenta vsebuje ime izbirnega argumenta procedure Variant.
Opombe
Uporabite funkcijo IsMissing za ugotavljanje, ali so izbirni argumenti Variant navedeni pri priklicu procedure ali ne. Funkcija IsMissing vrne True, če ni podane vrednosti za določeni argument; v nasprotnem primeru vrne False. Če funkcija IsMissing vrne True za argument, lahko zaradi uporabe manjkajočega argumenta v drugi kodi pride do uporabniško določene napake. Če je funkcija IsMissing uporabljena v argumentu ParamArray, vedno vrne False. Za zaznavanje praznega argumenta ParamArray, preverite, ali je zgornja meja matrike manjša od njene spodnje meje.
Opomba: Funkcija IsMissing ne deluje v enostavnih podatkovnih tipih (kot so Integer ali Double), ker za razliko od argumentov Variant, nimajo možnosti za »manjkajoče« bitne oznake. Zaradi tega sintaksa za vnesene izbirne argumente omogoča, da določite privzeto vrednost. Če opustite argument pri priklicu procedure, bo imel argument to privzeto vrednost, tako kot je prikazano v spodnjem primeru:
Opomba: V spodnjih primerih je prikazana uporaba te funkcije v modulu Visual Basic for Applications (VBA). Če želite več informacij o delu z modulom VBA, izberite Vsebina za razvijalce na spustnem seznamu ob možnosti Iskanje in v iskalno polje vnesite enega ali več izrazov.
Sub MySub(Optional MyVar As String = "specialvalue") If MyVar = "specialvalue" Then ' MyVar was omitted. Else ...End Sub
V mnogih primerih lahko preskus If MyVar popolnoma izpustite, tako da privzeto vrednost izenačite z vrednostjo, za katero želite, da bi jo vseboval MyVar, če jo uporabnik izpusti iz priklica funkcije. Tako bo vaša koda krajša in učinkovitejša.
Primer
V tem primeru je funkcija IsMissing uporabljena za preverjanje, ali je izbirni argument podan v uporabniško določeni proceduri. Upoštevajte, da imajo argumenti Optional zdaj lahko drugačne privzete vrednosti in tipe od argumenta 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 IfEnd Function
