خاصية OptionValue

ينطبق على

عنصر CheckBox

عنصر OptionButton

عنصر ToggleButton

يتضمن كل عنصر تحكم في مجموعة خيارات قيمة رقمية يمكنك تعيينها بواسطة خاصية OptionValue. Long قراءة/كتابة.

expression.OptionValue

expression Required. تعبير يُرجع أحد العناصر في قائمة "ينطبق على".

ملاحظات

عندما يتم تحديد عنصر التحكم، يتم تعيين الرقم لمجموعة الخيارات. إذا كانت مجموعة الخيارات مرتبطة بحقل، يتم تخزين قيمة خاصية OptionValue لعنصر التحكم المحدد في الحقل.

على سبيل المثال، مجموعة خيارات المنطقة هذه مرتبطة بحقل "المنطقة" في جدول. يتضمن زر أوروبا إعداد خاصية OptionValue وهو 1، ويتضمن زر آسيا الإعداد 2، وزر أفريقيا الإعداد 3. عندما يتم تحديد أحد هذه الأزرار، ستكون قيمة مجموعة خيارات المنطقة هي نفس إعداد خاصية OptionValue لعنصر التحكم المحدد. في هذه الحالة، ونظراً لأن مجموعة خيارات المنطقة مرتبطة بحقل "المنطقة"، فإن قيمة هذا الحقل في الجدول تساوي أيضاً 2.

ملاحظة: لا تنطبق خاصية OptionValue إلا على عناصر التحكم خانة اختيار وزر خيار وزر تبديل في مجموعة خيارات.

يمكنك تعيين خاصية OptionValue باستخدام صفحة الخصائص الخاصة بعنصر التحكم أو الماكرو أو التعليمة البرمجية لـ Visual Basic for Applications ‏(VBA).

ما لم تقم بتغيير خاصية OptionValue بنفسك، تكون قيمة أول عنصر تحكم تضعه في مجموعة الخيارات 1، وقيمة عنصر التحكم الثاني 2، وهكذا.

لا تتوفر خاصية OptionValue إلا عندما يتم وضع عنصر التحكم داخل عنصر تحكم مجموعة خيارات. عندما لا تتضمن مجموعة الخيارات خانة اختيار أو زر تبديل أو زر خيار، لا يتضمن عنصر التحكم خاصية OptionValue. بدلاً من ذلك، يتضمن كل عنصر تحكم خاصية ControlSource وستكون قيمة كل عنصر تحكم إما True إذا تم تحديده أو False إذا لم يتم تحديده.

مثال

تُعين مجموعات الأمثلة التالية خاصية OptionValue لثلاثة من أزرار الخيارات في مجموعة خيارات "مجموعة طُرق الشحن" عند فتح نموذج. عند تحديد زر خيار في مجموعة الخيارات، تظهر رسالة تُشير إلى رقم المعرف المُعين لشركة الشحن.

Private Sub Form_Open(Cancel As Integer)
Me.Controls("ABC Couriers").OptionValue = 15876
Me.Controls("Speedy Delivery").OptionValue = 742
Me.Controls("Lightning Express").OptionValue = 1256
End Sub
Private Sub Ship_Method_Group_Click()
MsgBox "The ID for the selected shipper is " & _
Me.Controls("Ship Method Group").Value
End Sub
توسيع المهارات
استكشاف التدريب
الحصول على الميزات الجديدة أولاً
الانضمام إلى Office Insider

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

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

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

×