الفريق العربي للبرمجةأرشيف المنتديات · 2000 – 2023
نسخة أرشيفية للقراءة فقط — التسجيل والمشاركة مغلقان، والمحتوى محفوظ كما كان.

سوال عن طريقة استعال عدد كبير من checkbox

مغلق
بدأه mahmoud_f في 23 سبتمبر 2006 · 3 رد · 515 مشاهدة · في لغة Ms Visual Basic 6 وما قبلها من إصدارات
مشاركة: واتساب X فيسبوك تيليجرام
#1 صاحب الموضوع

السلام عليكم ورحمة الله وبركاته

الى احبيبى واخوتى في الاسلام

اود ان اسالكم سوال

انا بعمل مشروع ويتم وضع 20 check box وبجورهم label بدخلة واود انا اعرف كيف اعرف متى يتم الضغط على اى واحد منهم واستخدام الطريقة التالية ولم تنفع

if checkbox1.value=1 end checkbox2.value=1end checkbox3.value=1 thet

msg box "ghgh"

end if

والطريق التالية نفعات

if checkbox1.value=1 end checkbox2.value=1thet

msg box "ghgh"

end if

واود اتستخامه مع عدد كبير من chek box

#2

بصراحه ارغب في مساعدتك ولكن .. للاسف ما ني فاهم ولا كلمه من اللي مكتوب ؟!

ليس كل ما يتمناه المرء يدركه

arabteam2000.gif

#3

السلام عليكم ..

أخي الكريم ..

ارى ان تستعمل مصفوفة من الادوات ..

بحيث تضع اداة check box واحده في المشروع ثم تقوم بعملية النسخ ثم اللصق .

يظهر لك رسالة يقولك فيها هل تريد عمل مصفوفة أختر نعم ..

ثم يا طويل العمر استخدم حلقة FOR في كل العمليات التي تريدها ..

x = 0
for i = 0 to 5 
if check1(i).value = 1 them
x = x + 1
end if
next
if x = 6 then magbox ""

هذا مثال صغير جداً ان شاء الله اكون قد افدتك ..

دمت بخير ..،،

تم تعديل هذه المشاركة بواسطة ماجددج في 23 سبتمبر 2006 في 15:11

#4

الأخ الفاضل الحل كما ذكر الأخ ماجد كما يمكن ايضا استخدام الأداه ListBox مع تغيير الخاصية Style الى CheckBox واليك مثال على الطريقتين أرجو أن يفى بالغرض

Check.rar

كن كالنخيل عن الأحقاد مرتفعا .. يرمى بصخر فيرمى أطيب الثمر

هذا الموضوع مغلق.

مواضيع مشابهة