اريد حذف عنصر من قائمة التكست بوكس
وذلك بلاستدلال عليه من خلال مربع نص
ولتوضيح
لدي قائمه فيها LISTBOX تحتوزي على الاسماء التاليه
ahmed
nasser
ali
said
azhar
yaser
ولدي مربع نص يمكن أن يحتوي على أي اسم من الاسماء التاليه
مثلا TEXT1.text="nasser
وانا اريد حذف الاسم هذا من القائمه
يوجد مثال لمن يحب فعل الخير
شكرا لكم
هذا هو الكود المطلوب
For i = 0 To List1.ListCount - 1 If List1.List(i) = Text1.Text Then List1.RemoveItem (i) End If Next
ضعه في حدث الكوماند 6
ملاحظة : يجب ان يتطابق الاسم تماما يعني Ahmed ليست نفس ahmed وذلك لان حرف A في الكلمة الاولى Capital
لا تنسانا من الدعاء
من دروسي :
درس مبسط لفهم ال VB6.... Resource File
تعلم تصميم اداة ال Active X خطوة بخطوة (الجزء الأول)
الطريقة المثلى للتعامل مع مسجل النظام( VB6..... (Registry
من برامجي :
Abo Sabreen Messenger v2.1 العملاق
--------------------------------------------------
مفكرة الإسلام؛ طالع أخبار العالم وأخبار المجاهدين بعيدا عن التعتيم الاعلامي.
ابدعت
جزاك الله خير
الحمد ان وفق اخي "ابو صابرين " للاجابة
و نرجو ان تكون العناوين دالة علي محتواها في المرة القادمة
:)
هذا الموضوع مغلق.