منتدى فيجوال بيسك لكل العرب | منتدى المبرمجين العرب
[سؤال] ربط بين 2 combobox؟ - نسخة قابلة للطباعة

+- منتدى فيجوال بيسك لكل العرب | منتدى المبرمجين العرب (http://vb4arb.com/vb)
+-- قسم : قسم لغة الفيجوال بيسك VB.NET (http://vb4arb.com/vb/forumdisplay.php?fid=182)
+--- قسم : قسم اسئلة VB.NET (http://vb4arb.com/vb/forumdisplay.php?fid=183)
+--- الموضوع : [سؤال] ربط بين 2 combobox؟ (/showthread.php?tid=11855)



ربط بين 2 combobox؟ - abid - 24-03-15

السلام عليكم ورحمة الله وباركته ,,, اخواني حياكم الله 
انا ربط بين 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
وبارك الله فيكم


RE: ربط بين 2 combobox؟ - Dr.Sherif Alazizi - 24-03-15

(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

بالتوفيق


RE: ربط بين 2 combobox؟ - abid - 24-03-15

(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

بالتوفيق

د.جزاك الله خيرا وبارك الله فيك


RE: ربط بين 2 combobox؟ - محمد عبده - 22-03-20

طيب واذا اردت ان اربط tow combo ولكن  اريد ايضا ان احذف احد عناصر الكمبو الثاني  كيييف؟


RE: ربط بين 2 combobox؟ - ابراهيم ايبو - 22-03-20

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