تقييم الموضوع :
  • 0 أصوات - بمعدل 0
  • 1
  • 2
  • 3
  • 4
  • 5
ممكن كود ارجاع عناصر اليست بوكس بعد ابحث
#1
انا عندي ليست بوكس وابحث بداخلة عن سنة معينة وعند البحث يستخرج السنة ويحذف باقي السنوات والكود لحد كدة شغال معايا

بس المشكلة اني بعد البحث لايرجع كل محتوي اليست بوكس اي العانصر التي سبق تحميلها collection item

اريد ارجاع العناصر لانة يجب غلق ابرنامج لارجاعها
الرد }}}
تم الشكر بواسطة:
#2
السلام عليكم ورحمة الله وبركاته

أخي الكريم
ضع أداتي ListBox
الأولى تضع فيها البيانات
والثانية تعرض فيها نتائج البحث

بالتوفيق
الرد }}}
تم الشكر بواسطة:
#3
السلام عليكم

اخي العزيز تستطيع ان تظلل الكلمة التي تبحث عنها بدون ان تمسح محتويات الListbox كالتالي:

PHP كود :
Private Sub Button2_Click(sender As System.ObjectAs System.EventArgsHandles Button2.Click
        
For 0 To ListBox1.Items.Count 1
            
If (ListBox1.Items(i) = "sajad"Then
                ListBox1
.SelectedItem ListBox1.Items(i)
            
End If
        
Next
    End Sub 
الرد }}}
تم الشكر بواسطة:
#4
مشكور جدا علي الرد اخي sajad ولكن اريد البحث باول الكلمة ووسط الكلمة واخرها اي فلترة كاملة
الرد }}}
تم الشكر بواسطة:
#5
السلام عليكم

تفضل اخي العزيز

PHP كود :
Private Sub Button2_Click(sender As System.ObjectAs System.EventArgsHandles Button2.Click
        Dim s 
As String "sajad mohammed baqir"
        
Dim item As String
        
For 0 To ListBox1.Items.Count 1
            item 
ListBox1.Items(i).ToString()
            If (
item.Substring(0item.IndexOf(" ")) = s.Substring(0s.IndexOf(" "))) Then
                
If (item.Substring(item.IndexOf(" "), item.LastIndexOf(" ")) = s.Substring(s.IndexOf(" "), s.LastIndexOf(" "))) Then
                    
If (item.Substring(item.LastIndexOf(" "), item.Length item.LastIndexOf(" ")) = s.Substring(s.LastIndexOf(" "), s.Length s.LastIndexOf(" "))) Then


                        ListBox1
.SelectedItem ListBox1.Items(i)
                    
End If
                
End If
            
End If
        
Next
    End Sub 

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

موفق ان شاءالله
الرد }}}
تم الشكر بواسطة:
#6
اي عملية بحث تعطي الخطا

Length cannot be less than zero.
Parameter name: length
الرد }}}
تم الشكر بواسطة:
#7
السلام عليكم

اخي العزيز يجب ان تكتب الاسم كاملة أي (ثلاثي) انا جربت المثال ورفعته لك حسب ما فهمت

فيا ريت اذا ما تريده تختلف فارجو التوضيح
الرد }}}
تم الشكر بواسطة:
#8
حتى يتبين لك ماقاله الاخوة الفضلاء .. جرب وضع كود تحميل البيانات في روتين sub مستقل وقم باستدعائه متى ما اردت.
الرد }}}
تم الشكر بواسطة:
#9
السلام عليكم،
يوجد مثال بالمرفقات قد يلبي طلبك


الملفات المرفقة
.rar   Search In ListBox.rar (الحجم : 88.11 ك ب / التحميلات : 55)
الرد }}}
تم الشكر بواسطة:
#10
رائع اخي
Aly El-Haddad بارك الله فيك
الرد }}}
تم الشكر بواسطة:


المواضيع المحتمل أن تكون متشابهة .
الموضوع : الكاتب الردود : المشاهدات : آخر رد
  ممكن حل المشكلة فى الكود التالي - من مشاركة استاذنا القدير / عبدالله الدوسري new_programer 4 169 02-03-24, 07:36 PM
آخر رد: new_programer
  تظليل التكست بوكس عند وضع المؤشر مصمم هاوي 2 144 02-03-24, 08:48 AM
آخر رد: مصمم هاوي
  بحث بالكومبو بوكس لا ى جزء من النص Lathe1 3 440 28-02-24, 02:59 AM
آخر رد: معاند الحظ
Sad ممكن حل لهذا المشكل melad2002 0 239 30-01-24, 08:01 PM
آخر رد: melad2002
  ممكن استفسار عن m3u8 malekmohamed155 0 232 20-01-24, 07:47 PM
آخر رد: malekmohamed155
  ممكن تعديل في كود التفقيط للارقام melad2002 2 333 01-01-24, 08:47 PM
آخر رد: melad2002
  [VB.NET] السلام عليكم ممكن مساعدة اخوان احتاج يكون تسجيل الدخول textbox1 + textbox2 Coder_iraqii 4 400 18-12-23, 06:46 PM
آخر رد: Kamil
  كيف ارسل مجموع 3 تكست بوكس إلى واحد بالترتيب ؟ أبووسم 3 330 18-12-23, 05:17 PM
آخر رد: أبووسم
  [سؤال] توزيع الارقام على أكثر من تكست بوكس أبووسم 11 692 17-11-23, 12:04 AM
آخر رد: أبووسم
  ممكن كود ترقيم تلقائي في الداتا غريد فيو المبرمج البسيط 16 10,577 08-11-23, 01:44 AM
آخر رد: الحزين اليماني

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


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