الدالة Choose

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

تحديد قيمة وإرجاعها من قائمة من الوسائط.

بناء الجملة

Choose( index , choice-1 [, choice-2] ... [, choice-n] )‎

يحتوي بناء جملة الدالة Choose على الوسيطات التالية:

الوسيطة

الوصف

index

مطلوب. تعبير رقمي او حقل ينتج عنه قيمه بين 1 و# عدد الاختيارات المتاحه.

choice

مطلوب. تعبير متغير يحتوي علي احد الخيارات الممكنه.


ملاحظات

تقوم الدالة Choose بإرجاع قيمة من قائمة الخيارات بناءً على قيمة index. إذا كانت قيمة index تساوي 1، تقوم الدالة Choose بإرجاع الخيار الأول في القائمة؛ إذا كانت قيمة index تساوي 2، يتم إرجاع الخيار الثاني، وهكذا.

يمكنك استخدام الدالة Choose للبحث عن قيمة في قائمة الاحتمالات. على سبيل المثال، إذا كانت قيمة index تساوي 3 وchoice-1 = "one" وchoice-2 = "two"و choice-3 = "three"، تقوم الدالة Choose بإرجاع "three". تفيد تلك الميزة إذا كان index يمثل القيمة في مجموعة خيارات.

تقوم الدالة Choose بتقييم كل خيار في القائمة، مع أنه يتم إرجاع واحد فقط. ولهذا السبب، يجب مراعاة النتائج غير المطلوبة التي قد تترتب على ذلك. على سبيل المثال، في حالة استخدام الدالة MsgBox كجزء من تعبير في كافة الخيارات، سيتم عرض مربع رسالة لكل خيار بينما يتم تقييمه، ومع ذلك تقوم الدالة Choose بإرجاع قيمة خيار واحد فقط.

الداله Choose ترجع قيمه خاليه اذا كان الفهرس اقل من 1 او اكبر من عدد الخيارات المذكوره.

إذا كان index لا يمثل رقمًا صحيحًا، يتم تقريبه إلى أقرب رقم صحيح قبل تقييمه.

مثال

ملاحظة: توضح الأمثلة التالية استخدام هذه الدالة في وحدة نمطية لـ Visual Basic for Applications (VBA). لمزيد من المعلومات حول استخدام VBA، حدد مرجع المطور في القائمة المنسدلة بجوار بحث وأدخل مصطلح أو أكثر في مربع البحث.

يستخدم هذا المثال الدالة Choose لعرض اسم كاستجابة للفهرس الذي يتم تمريره في إجراء في المعلمة Ind.

Function GetChoice(Ind As Integer)
GetChoice = Choose(Ind, "Speedy", "United", "Federal")
End Function

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

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

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

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

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

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

×