منتدى فيجوال بيسك لكل العرب | منتدى المبرمجين العرب
مطلوب كود select all للأداة chekbox - نسخة قابلة للطباعة

+- منتدى فيجوال بيسك لكل العرب | منتدى المبرمجين العرب (http://vb4arb.com/vb)
+-- قسم : قسم لغات البرمجة الاخرى (http://vb4arb.com/vb/forumdisplay.php?fid=4)
+--- قسم : قسم لغة vb6.0 (http://vb4arb.com/vb/forumdisplay.php?fid=18)
+---- قسم : قسم أسئلة vb6.0 (http://vb4arb.com/vb/forumdisplay.php?fid=28)
+---- الموضوع : مطلوب كود select all للأداة chekbox (/showthread.php?tid=21107)



مطلوب كود select all للأداة chekbox - Abo Mnsour - 18-07-17

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

لدى برنامج به عدد من أدوات chekbox و زر كوماند 

اريد كود للوضعه فى الزر لاختيار الجميع


RE: مطلوب كود select all للأداة chekbox - Abo Mnsour - 18-07-17

شكرا استاذى المحترم
انا اتعلم البرمجة بقراءة بعض الكتب و عمل تطبيقات كثيرة لتثبيت المعلومة
لكن انا لم اصل لاستخدام for بعد و كنت اظن انى ساستخدم if الشرطية

هل تدلنى على موضوع يتكلم عن for لان البحث فى المنتدى يتطلب 4 حروف
و جزاك الله خيرا و آسف على الازعاج


RE: مطلوب كود select all للأداة chekbox - Abo Mnsour - 18-07-17

(18-07-17, 11:01 PM)Amir_alzubidy كتب : لا لا لازم نتعلم جمل التكرار
هذا شي ضروري اخي ابو منصور
تفضل هذا درس للاخ الاستاذ
احمد مناع جزاه الله خير الجزاء

http://egy-tech.forumegypt.net/t84-topic

نعم انا معك اخى المحترم
أنما قصدت انى اتعلم البرمجة تدريجيا فكلما قرأت درسا قمت بتجربة العديد من الامثلة عليه لتثبيت المعلومة
و قد وصلت الى استخدام IF و لم أصل الى FOR بعد
هذا ما قصدته
و سأبدا بإذن الله فى دراسة FOR


RE: مطلوب كود select all للأداة chekbox - Ahmed_Mansoor - 19-07-17

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

أهلا أخي الكريم , أخي أمير جزاه الله كل خير حب أن يختصر عليك الكود , ولكن بما أنك في بداية تعلمك فتستطيع أن تكتب إسم كل أداة Check وتضع قيمة خاصية Value التابعه لها تساوي 1 والواحد يعني تحديد والصفر يعني عدم تحديد , يعني لنفترض أن عندك في الفورم 5 أدوات CheckBox وتريد تحديدها كلها بالضغط على الـ Command1 , ضع هذا الكود في الزر :

PHP كود :
Check1.Value 1
Check2
.Value 1
Check3
.Value 1
Check4
.Value 1
Check5
.Value 

- بالتوفيق والنجاح .


RE: مطلوب كود select all للأداة chekbox - Abo Mnsour - 19-07-17

(18-07-17, 11:52 AM)Amir_alzubidy كتب : السلام عليكم و رحمة الله 
هذا مثال 
او يمكننا استخدام الكود الآتي : 

PHP كود :
Dim i As Integer
For 0 To 11
Check1
(i).Value 1
Next 

(19-07-17, 01:06 AM)Ahmed_Mansoor كتب : وعليكم السلام ورحمة الله وبركاته

أهلا أخي الكريم , أخي أمير جزاه الله كل خير حب أن يختصر عليك الكود , ولكن بما أنك في بداية تعلمك فتستطيع أن تكتب إسم كل أداة Check وتضع قيمة خاصية Value التابعه لها تساوي 1 والواحد يعني تحديد والصفر يعني عدم تحديد , يعني لنفترض أن عندك في الفورم 5 أدوات CheckBox وتريد تحديدها كلها بالضغط على الـ Command1 , ضع هذا الكود في الزر :

PHP كود :
Check1.Value 1
Check2
.Value 1
Check3
.Value 1
Check4
.Value 1
Check5
.Value 

- بالتوفيق والنجاح .

جزاكم الله خيرا الاساتذة المحترمين
هل يمكن استخدام كود آخر لزر OK ليقوم بتنفيذ الأوامر بعد اختيار ال CHEKBOX
بدلا من استخدام قاعدة IF
الغرض من السؤال هو التعلم
المشروع مرفق