Vraća Bulovu vrednost koja ukazuje na to da li je opcionalnaargumentvarijante prosleđena procedura.
Sintaksa
IsMissing( argname )
Potrebni argument argname sadrži ime opcionalnog argumenta procedure Variant .
Napomene
Koristite funkciju IsMissing da biste otkrili da li su opcionalni argumenti varijanta obezbeđeni u pozivanju procedure. IsMissing vraća vrednost "Tačno" ako nije prosleđena nijedna vrednost za navedeni argument; u suprotnom, daje False. Ako IsMissing vraća vrednost "Tačno " za argument, korišćenje argumenta koji nedostaje u drugom kodu može dovesti do korisnički definisane greške. Ako se isMissing koristi na ParamArray argumentu, on uvek vraća vrednost Netačno. Da biste otkrili praznu ParamArray, testirajte da biste videli da li je gornja granica niza manja od njegove donje granice.
Napomena: IsMissing ne radi na jednostavnim tipovima podataka (kao što su Ceo broj ili Dvostruki) zato što za razliku od varijanti, one nemaju privilegiju za bit zastavice "koji nedostaje". Zbog toga, sintaksa za otkucane opcionalne argumente omogućava vam da navedete podrazumevanu vrednost. Ako se argument izostavi kada se procedura poziva, argument će imati ovu podrazumevanu vrednost, kao u dolenavedenom primeru:
Napomena: Primeri koji slede pokazuju upotrebu ove funkcije u Visual Basic for Applications (VBA) modulu. Za više informacija o radu sa VBA modulom izaberite stavku Referenca razvojnog programera sa padajuće liste pored stavke Pretraga i unesite termine u polje za pretragu.
Sub MySub(Optional MyVar As String = "specialvalue") If MyVar = "specialvalue" Then ' MyVar was omitted. Else ...End Sub
U mnogim slučajevima možete potpuno da izostavite If MyVar tako što ćete podrazumevanu vrednost podesiti na vrednost koju želite da MyVar sadržati ako ga korisnik izostavi iz poziva funkcije. To vaš kôd čini konciznijim i efikasnijim.
Primer
Ovaj primer koristi funkciju IsMissing kako bi proverio da li je opcionalni argument prosleđen korisnički definisanoj proceduri. Imajte na umu da Opcionalni argumenti sada mogu da imaju podrazumevane vrednosti i tipove koji nisu Varijanta.
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
