Повертає логічне значення, яке вказує на те, чи до процедури передано необов'язковий аргумент Variant .
Синтаксис
IsMissing(назва)
Обов'язковий аргумент argname містить ім'я необов'язкового аргументу процедури Variant .
Примітки
За допомогою функції IsMissing можна визначити, чи вказано необов'язкові аргументи Variant під час виклику процедури. IsMissing повертає значення True , якщо для вказаного аргументу не було передано жодного значення; інакше вона повертає значення False. Якщо функція IsMissing повертає значення "Істина " для аргументу, використання такого аргументу в іншому коді може призвести до помилки, яку визначив користувач. Якщо вираз IsMissing використовується для аргументу ParamArray , він завжди повертає значення False. Щоб виявити пустий масив параметрів, перевірте, чи верхня межа масиву менша за нижню межу.
Примітка.
IsMissing не працює з простими типами даних (наприклад, Integer або Double), оскільки, на відміну від Variants, у них не передбачено "відсутній" біт прапорця. Саме тому синтаксис введених необов'язкових аргументів дає змогу вказати стандартні значення. Якщо під час виклику процедури аргумент не вказано, аргумент матиме таке значення за замовчуванням, як у прикладі нижче:
Примітка.
У прикладах нижче показано використання цієї функції в модулі Visual Basic for Applications (VBA). Щоб отримати докладні відомості про використання модуля VBA, клацніть пункт Довідник розробника в розкривному списку поряд із полем Пошук і введіть у поле пошуку принаймні один термін.
Sub MySub(Optional MyVar As String = "specialvalue")
If MyVar = "specialvalue" Then
' MyVar was omitted.
Else
...
End Sub
У багатьох випадках ви можете повністю пропустити перевірку If MyVar , зробивши значення за замовчуванням рівним значенню, яке ви хочете MyVar містити, якщо користувач опустив його з виклику функції. Це зробить ваш код лаконічнішим і ефективнішим.
Приклад
У цьому прикладі функцію IsMissing використано, щоб перевірити, чи передано необов'язковий аргумент процедурі, яку визначив користувач. Зауважте, що необов'язкові аргументи тепер можуть мати значення за замовчуванням і типи, відмінні від 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