الدالة Choose

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

بناء الجملة

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

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

الوسيطة

الوصف

الفهرس

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

مقطعي

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


ملاحظات

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

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

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

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

إذا لم يكن الفهرس رقما صحيحا ، سيتم تقريبه إلى أقرب رقم صحيح قبل تقييمه.

أمثله استعلام

التعبير

النتائج

حدد اختيار (3, "يناير", "فبراير", "ابريل", "يوليو", "أغسطس", "سبتمبر", "", "نوفمبر", "الExpr1", "", ",", ",", ""

ترجع هذه الدالة القيمة ثلاثية الابعاد من قائمه القيم. النتيجة: "مارس".

حدد داتيوفسالي ، واختر (Month (داتيوفسالي) ، "", "فبراير", "ابريل", "", "", "يوليو", "أغسطس", «سبتمبر "," النوفمبر ", «الأساس») ، و «الأساس»

إرجاع القيم الموجودة في "داتيوفسالي" واسم الشهر الخاص به في العمود "MonthName". (Month (داتيوفسالي) ترجع رقم شهر "داتيوفسالي" ، والذي يتم استخدامه كفهرس للاختيار من ضمن قائمه الاختيارات في "الدالة Choose").

مثال VBA

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

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

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

ملاحظة:  وقد تمت ترجمة هذه الصفحة آلياً وقد تحتوي على أخطاء نحوية أو أخطاء تتعلق بالدقة. إن هدفنا هو أن يكون هذا المحتوى مفيداً لك. هل يمكنك إعلامنا إذا ما كانت المعلومات مفيدة؟ فيما يلي المقالة باللغة الإنجليزية لتكون مرجعاً لك.

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