اذا امكن تعديل هذا الكود - نسخة قابلة للطباعة +- منتدى فيجوال بيسك لكل العرب | منتدى المبرمجين العرب (http://vb4arb.com/vb) +-- قسم : قسم لغة الفيجوال بيسك VB.NET (http://vb4arb.com/vb/forumdisplay.php?fid=182) +--- قسم : قسم اسئلة VB.NET (http://vb4arb.com/vb/forumdisplay.php?fid=183) +--- الموضوع : اذا امكن تعديل هذا الكود (/showthread.php?tid=8156) |
اذا امكن تعديل هذا الكود - مبتدئ - 26-03-13 السلام عليكم لو عندى Listbox اريد ازاله item اضفت هذا الكود كود : For i As Integer = ListBox2.SelectedIndices.Count - 1 To 0 Step -1 اذا امكن تعديل هذا الكود - سعود - 26-03-13 لا ادري هل ما اكتبه ماتريده ام لا بحدث النقر لزر الامر اكتب: كود : Dim i As Integer = ListBox1.SelectedIndex اذا امكن تعديل هذا الكود - سعود - 26-03-13 او من غير +=i اكتب =i اذا امكن تعديل هذا الكود - سعود - 26-03-13 كود : Dim i As Integer = ListBox1.SelectedIndex نعم هذا هو المطلوب على مااظن اذا امكن تعديل هذا الكود - سعود - 26-03-13 لكن لو تحذف اخر قيمة بيصير خطا الحل كود : Dim i As Integer = ListBox1.SelectedIndex ListBox1.Items.Remove(ListBox1.SelectedItem) اذا امكن تعديل هذا الكود - مبتدئ - 26-03-13 سعود كتب : هذا هو المطلوب جزاك الله خير و جعله فى مزان حسناتك اذا امكن تعديل هذا الكود - سعود - 26-03-13 واياك اخي الكريم فكر بما لو كان البند المراد حذفه آخر قيمة حتما سيحدث خطا والحل #5 اذا امكن تعديل هذا الكود - مبتدئ - 26-03-13 سعود كتب :واياك اخي الكريم يممكننى اضافة Try لاجل عد الحصول على الخطأ شكرآ اخى اذا امكن تعديل هذا الكود - just.coder - 27-03-13 تفضل اخى هذا لا يعطى اخطاء اذا كانت الايتم المختارة هيا الاخيرة ويقوم بحذفها كود : For i As Integer = 0 To ListBox1.Items.Count - 1 |