الدالة IsMissing

ترجع قيمة منطقية تشير إلى ما إذا تم تمريروسيطةمتغير اختياري إلى الإجراء.

بناء الجملة

IsMissing( argname )

تحتوي الوسيطة argname المطلوبة على اسم وسيطة الإجراء Optional Variant.

ملاحظات

استخدم الدالة IsMissing للكشف عما إذا كان قد تم توفير وسيطات Variant الاختيارية في استدعاء إجراء أم لا. ترجع IsMissingالقيمة True إذا لم يتم تمرير أي قيمة لل الوسيطة المحددة؛ وإلا، فإنه يرجع False. إذا أرجعت IsMissingTrue ل وسيطة، فقد يتسبب استخدام الوسيطة المفقودة في تعليمات برمجية أخرى في حدوث خطأ معرف من قبل المستخدم. إذا تم استخدام IsMissing على وسيطة ParamArray، فستعمل دائما على إرجاع False. للكشف عن ParamArrayفارغ، اختبر ما إذا كان الحد العلوي للصفيف أقل من الحد الأدنى.

ملاحظة: لا يعمل IsMissing على أنواع بيانات بسيطة (مثل "عدد صحيح" أو "مزدوج") لأنه، بخلاف المتغيرات، ليس لديهم أي توفير ل بت العلامة "مفقود". ولهذا السبب، يسمح لك بناء جملة الوسيطات الاختيارية التي تكتب بتحديد قيمة افتراضية. إذا تم حذف الوسيطة عند استدعاء الإجراء، فإن الوسيطة ستمثل هذه القيمة الافتراضية، كما في المثال أدناه:

ملاحظة: توضح الأمثلة التالية استخدام هذه الدالة في وحدة نمطية في 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 للتحقق مما إذا تم تمرير وسيطة اختيارية إلى إجراء معرف من قبل المستخدم. لاحظ أن الوسيطات الاختيارية يمكن أن يكون لها الآن قيم وأنواع افتراضية غير متغيرة.

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

هل تحتاج إلى مزيد من المساعدة؟

تعزيز مهارات Office
استكشاف التدريب
الحصول على الميزات الجديدة أولاً
الانضمام إلى Office Insider

هل كانت المعلومات مفيدة؟

نشكرك على ملاحظاتك!

شكراً لك على الملاحظات! يبدو أنه من المفيد إيصالك بأحد وكلاء دعم Office لدينا.

×