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

بناء الجملة

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

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

الوسيطة

الوصف

الفهرس

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

اختيار

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


ملاحظات

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

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

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

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

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

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

التعبير

النتائج

SELECT Choose(3,"Jan","Feb","Mar","Apr","May","Jun","Jul","Aug","Sep","Oct","Nov","Dec") AS Expr1 FROM ProductSales;

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

SELECT DateofSale, Choose(Month(DateofSale),"Jan","Feb","Mar","Apr","May","Jun","Jul","Aug","Sep","Oct","Nov","Dec") AS MonthName FROM ProductSales;

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

مثال VBA

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

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

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

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

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

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

ما مدى رضاك عن جودة اللغة؟
ما الذي أثّر في تجربتك؟

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

×