الدالة Choose

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

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

بناء الجملة

اختيار ( الفهرس [ الاختيار-1 ، 2 الاختيار]... [، اختيار-n] )

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

الوسيطة

الوصف

فهرس

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

اختيار

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


ملاحظات

ارجاع اختيار قيمه من قائمه الاختيارات استنادا الي قيمه الفهرس. اذا كان فهرس 1، ترجع Choose الخيار الاول في القائمه; اذا كانت الفهرس 2، ترجع الخيار الثاني، و# ما الي ذلك.

يمكنك استخدام اختيار ل# البحث عن قيمه في قائمه ب# الامكانيات المتوفره. علي سبيل المثال، اذا تم تقييم الفهرس الي 3 و# اختيار-1 = "واحد"، اختيار-2 = "اثنين"، و# الخيار 3 = "ثلاثه"، ف# ترجع Choose القيمه "ثلاثه". هذه القدره مفيدا خاصه اذا فهرس تمثل القيمه الموجوده في مجموعه خيارات.

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

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

اذا لم يكن فهرس عددا صحيحا، يتم تقريبه الي اقرب عدد صحيح قبل ان يتم تقييمه.

مثال

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

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

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

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

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

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

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

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

×