تقييم الموضوع :
  • 0 أصوات - بمعدل 0
  • 1
  • 2
  • 3
  • 4
  • 5
[سؤال] ربط بين 2 combobox؟
#1
السلام عليكم ورحمة الله وباركته ,,, اخواني حياكم الله 
انا ربط بين 2 combobox ونجحت الفكرة وهي حين اختار القيمة الاولى من الكمبو تاتي القيمة في الكمبو الاخر ولكن بقيمة التالية 
مثال الكمبو 1 فيه items 1-2-3-4 
الكمبو 2 فيه 1-2-3-4 items 
عند الضغط على 1في الكمبو 1 تاتي 2 في الكمبو 2 وهكذا
ComboBox2.SelectedIndex = ComboBox1.SelectedIndex + 1
المشكلة :
اذا وصلت اخر قيمة في الكمبو 1 وهي 4 يعطي خطاء لانه العدد الانديكس الي يزيد فيه الكمبو 1 لا يوجد في الكمبو2
وبارك الله فيكم
الرد }}}
تم الشكر بواسطة:
#2
(24-03-15, 03:09 PM)abid كتب : السلام عليكم ورحمة الله وباركته ,,, اخواني حياكم الله 
انا ربط بين 2 combobox ونجحت الفكرة وهي حين اختار القيمة الاولى من الكمبو تاتي القيمة في الكمبو الاخر ولكن بقيمة التالية 
مثال الكمبو 1 فيه items 1-2-3-4 
الكمبو 2 فيه 1-2-3-4 items 
عند الضغط على 1في الكمبو 1 تاتي 2 في الكمبو 2 وهكذا
ComboBox2.SelectedIndex = ComboBox1.SelectedIndex + 1
المشكلة :
اذا وصلت اخر قيمة في الكمبو 1 وهي 4 يعطي خطاء لانه العدد الانديكس الي يزيد فيه الكمبو 1 لا يوجد في الكمبو2
وبارك الله فيكم

شيئ طبيعي


لانه لايوجد بالكومبو بوكس الثاني قيمه لعرضها

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

     
كود :
 Try
           ComboBox2.SelectedIndex = ComboBox1.SelectedIndex + 1
       Catch ex As Exception
       End Try

بالتوفيق


ربما تغمض عينيك في سقف غرفتك فلا تفتحها الا أمام جبار السماوات والأرض يوم القيامه ... 
 " لا تنس آخرتك "
الرد }}}
تم الشكر بواسطة: رحوووم
#3
(24-03-15, 03:25 PM)Dr.Sherif Alazizi كتب :
(24-03-15, 03:09 PM)abid كتب : السلام عليكم ورحمة الله وباركته ,,, اخواني حياكم الله 
انا ربط بين 2 combobox ونجحت الفكرة وهي حين اختار القيمة الاولى من الكمبو تاتي القيمة في الكمبو الاخر ولكن بقيمة التالية 
مثال الكمبو 1 فيه items 1-2-3-4 
الكمبو 2 فيه 1-2-3-4 items 
عند الضغط على 1في الكمبو 1 تاتي 2 في الكمبو 2 وهكذا
ComboBox2.SelectedIndex = ComboBox1.SelectedIndex + 1
المشكلة :
اذا وصلت اخر قيمة في الكمبو 1 وهي 4 يعطي خطاء لانه العدد الانديكس الي يزيد فيه الكمبو 1 لا يوجد في الكمبو2
وبارك الله فيكم

شيئ طبيعي


لانه لايوجد بالكومبو بوكس الثاني قيمه لعرضها

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

     

كود :
 Try
           ComboBox2.SelectedIndex = ComboBox1.SelectedIndex + 1
       Catch ex As Exception
       End Try

بالتوفيق

د.جزاك الله خيرا وبارك الله فيك
الرد }}}
تم الشكر بواسطة:
#4
Wink 
طيب واذا اردت ان اربط tow combo ولكن  اريد ايضا ان احذف احد عناصر الكمبو الثاني  كيييف؟
الرد }}}
تم الشكر بواسطة:
#5
السلام عليكم ورحمة الله وبركاته
اخي الكريم بالنسبة لربط الكومبو مع بعض لايجوز ربطها بالاندكس لان الاندكس يبدأ من الصفر
 لذلك ستجد ان القيمة التي ستأتي هي اكبر ب 1
انما الربط يكون بـ Selectedvalue  كما يجب وضع الكود في جملة try_Catch تلافيا لاي خطأ
انظر الى الكود الموجود في الرد التالي:
http://vb4arb.com/vb/showthread.php?tid=33916
اعمل الخير وأجرك لا تنتظره فالله خير من إليك يرده
البرمجة ليست مجرد كود بل هي منهج تفكير منطقي لحل المشكلات







الرد }}}
تم الشكر بواسطة:



التنقل السريع :


يقوم بقرائة الموضوع: بالاضافة الى ( 1 ) ضيف كريم