السلام عليكم ورحمة الله وبركاته..
اخواني الكرام بين ايديكم الكريمة مثال مربع قائمة اريد ان اختار اربع قيم فقط من القائمة وعند اختيار القيمة الخامسة يعطيني رسالة ولا يقبل اختيار القيمة الخامسة...
دائما اصحاب فضل .... بارك الله بكم جميعا وجزاكم الله كل خير.
ابو عدنان ...
وعليكــم السـلام ورحمة الله وبركاتـه..
مرحباً بك اخي الحبيب ابو عدنان
ضع الكود ادناه بحدث عند النقر لمربع القائمة وايضاً اذا كنت تريد نفس الشرط عند التنفيذ يمكنك استدعاؤه لكي لا يكون التنفيذ الا بهذا الشرط.
If lstAge.ItemsSelected.Count = 5 Then MsgBox "عفواً لا يمكنك اختيار اكثر من اربعة عناصر" End If
ارجو ان يكون هو المطلوب
تفضل المرفق
ملاحظة : تم اضافة مرفق آخر به التعديل على الكود بزر التنفيذ
بالتوفيق
تم تعديل هذه المشاركة بواسطة يوسف احمد في 7 أبريل 2009 في 11:03
السلام عليكــم ورحمـة الله وبركاتــه ،،
ما شاء الله عليك معلم ... شكرا لك مشرفناالغالي يوسف احمد .. ان شاء جميع اعمالك نور لك في الدنيا والآخرة.
بارك الله بك وجزاك الله كل خير...
بارك الله فيك اخي ابو عدنان وجزاك خير الجزاء على دعواتك الطيبة .. ولك مثلها وزيادة ... آمين
هناك خطأ نبهني له الاخ ابو مريم من منتديات المحيط العربي وهذا الخطأ هو انه بعد ظهور الرسالة يمكن ان يتم اختيار العنصر الخامس واكثر من ذلك ايضاً
واشكره على تنبيهي فجزاه الله خيراً .. وقد قمت بالتعديل على الكود والمرفق به اخر تعديل
بالتوفيق
بسم الله الرحمن الرحيم ..
شكرا للاخ الغالي ابو مريم على التنبيه كما اشكر مشرفنا واستاذنا ومعلمنا الغالي يوسف احمد بارك الله بكم جميعا...
هناك ملاحظة عندي اردت ان اطرحها للفائدة :
القائمة عندي تجاوزت السبعين قيمة وعندما اردت وضع بحث على مربع القائمة لم تنجح العملية 
وهذا يلزم ابقاء القائمة على حالها ويتم اختيار القيم واحدة تلوا الاخرى مع استعراض كل القيم وبنفس الوضع الذي اقترحته اخي يوسف.
وهناك محاولة مني ارجو منها الفائدة للجميع بس هالمرة ليست قائمة بل نموذج مستمر واشارة صح ولكن (مكبرة) وتستطيع بهذا المثال تكبير اشارة صح على كيفك .. ارجو متابعة المثال للفائدة وشكرا لكم جميعا وبارك الله لنا بكم وبهذا المنتدى ومشرفيه واعضائه والقائمين عليه.
اخوكم ابو عدنان ..