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

[ تمت الإجابة ]مشكلة في الكمبو بوكس

بدأه shalan sawy في 29 ديسمبر 2008 · 4 رد · 566 مشاهدة · في لغة Ms Visual Basic 6 وما قبلها من إصدارات
مشاركة: واتساب X فيسبوك تيليجرام
#1 صاحب الموضوع

دلوقتي عندي كمبو بوكس ومخلي التكست بتعته فيها اختر اللغة وكاتب في كو الخفظ

If ComboBox2 = "" Then

MsgBox "ÇÎÊÇÑ ÇááÛå "

ComboBox2.SetFocus

Exit Sub

End If

الكود دة عشان يشيك علي هل المستخدم اختار ام لا بش المشكله انا بيجد كلمه اختر اللغة الموجودة في خاصيه التكست الخاصه بالكمبو فلا يعملاي شي

المطلوب انه يجد الكمبو فاضي والمستخدم لا يختار فيقف وذلك في وجو د توضح الي هو الرجا اختيار اللغه

وشكرااا

shalan2003@yahoo.com

#2

اضبط خاصية Style للكمبو بوكس على 2-DropDown List .

وفقك الله

هذه الجملة خاطئة  :wacko: 


#3

مبدئيا كده انا مش فاهم منك حاجه .. بس تعالى نرتب أفكارنا سوى

انت بتقول ان الكومبو مكتوب فيه ( إختر اللغة ) وانت بتشيك على العنصر المحدد = لا شيء او لأ .. صح كده ؟

والمطلوب ان اذا العنصر المحدد = ( إختر اللغة ) برده تظهر نفس الرساله .. صح ؟؟

وهنزود من عندنا كمان انه لو كتب لغة مش موجوده تظهر نفس الرسالة .. تمام ؟؟

نفرض مثلا انك بتملى الـ Combo بالشكل ده


Combo1.AddItem "Arabic"
Combo1.AddItem "English"
Combo1.AddItem "French"
Combo1.AddItem "Select Language"

العنصر الفارغ أو أي عنصر غير موجود في الكومبو يحمل الرقم -1

العنصر الأول ( Select Language ) يحمل الرقم 0

العنصر الثاني ( Arabic ) يحمل الرقم 1

العنصر الثالث ( English ) يحمل الرقم 2

العنصر الرابع ( French ) يحمل الرقم 3

والأرقام دي هي اللى موجوده في الـ Property اللى اسمها ( ListIndex )

معنى كده ان العنصر اللى مفروض نقبله هيكون الـ ListIndex يساوي أو أكبر من 1

يبقى المطلوب نستخدم كود التحقق من العنصر المحدد بالشكل ده


MsgBox "من فضلك إختر اللغة "
ComboBox2.SetFocus
Exit Sub
End If
If ComboBox2.ListIndex < 1 Then

اعتذر عن عدم تمكني للمتابعه الدورية في وقتنا الحالي

فليقبل الجميع تقديري واحترامي .. ولكم تحياتي

#4

ممكن تعملشرط لو الكمبو فاضي او فيه كلمة اختر يعني تعمل شرطين مش شرط واحد

If ComboBox2 = "" OR COMBO2.TEXT="اختر اللغة" THEN

ما زال الرجل عالما طالما يتحري العلم فان قال علمت ........ فقد جهل

#5

شكرااا لكم وجمييع الطرق نجحت بس في طريقه لاخ الفاضل mrx_ تكون0> لانه لن يحسب اول عنصر في ال additem

وشكراااااااااااااااااااااااااااااااااااا

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