الدالة IsMissing

هام: تمت ترجمة هذه المقالة ترجمة آلية، راجع إقرار إخلاء المسؤولية. يرجى الاطلاع على النسخة الإنجليزية من هذه المقالة. هنا للرجوع إليها.

تقوم بإرجاع قيمة منطقية تشير إلى ما إذا كانت وسيطةVariant الاختيارية قد تم تمريرها إلى إجراء أم لا.

بناء الجملة

IsMissing( argname )‎

تتضمن الوسيطة المطلوبة argname اسم وسيطة الإجراء الاختيارية Variant.

ملاحظات

استخدم الداله IsMissing ل# الكشف عن سواء اختياري تم توفير الوسائط متغير في استدعاء اجراء. تم تمرير IsMissing ترجع القيمه True اذا كانت ايه قيمه ل# الوسيطه المحدده؛ خلاف ذلك، ارجاع False. اذا كان IsMissing ترجع القيمه True ل# وسيطه، قد يؤدي استخدام الوسيطه المفقوده في التعليمات البرمجيه الاخري علي خطا المعرفه من قبل المستخدم. اذا تم استخدام IsMissing علي وسيطه ParamArray ، تقوم دائما ب# ارجاع False. ل# الكشف عن فارغ ParamArray، اختبر لتري اذا كان الصفيف الحد العلوي اقل من الحد السفلي الخاص بها.

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

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

ملاحظة: إقرار إخلاء المسؤولية للترجمة الآلية: تمت ترجمة هذه المقالة بواسطة نظام كمبيوتر دون تدخل العامل البشري. توفر Microsoft هذه الترجمات الآلية لمساعدة المستخدمين الذين لا يتحدثون الإنجليزية على استخدام منتجات Microsoft، وخدماتها، وتقنياتها والاستمتاع بها. قد تحتوي هذه المقالة على أخطاء في المفردات، أو بناء الجملة، أو القواعد نظرًا لترجمتها آليًا.

مشاركة Facebook Facebook Twitter Twitter البريد الإلكتروني البريد الإلكتروني

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

رائع! هل لديك أي ملاحظات أخرى؟

كيف يمكننا تحسين ذلك؟

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

×