منتدى فيجوال بيسك لكل العرب | منتدى المبرمجين العرب
ايجاد قيمة فى listview - نسخة قابلة للطباعة

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

ايجاد قيمة فى listview - Mohamed20 - 10-02-18

اذا كان يوجد listview تحتوي على هذه القيم 
1357861601
2107061502
3881271605
2479486166
اذا كان 135786160 ثابت و ادخل المستخدم هذه القيمة 1357861602 يوجد بالفعل 1357861601 اريد ان اعرف هل القيمة المضافة حيدثآ اكبر او اصغر من القيمة الموجوة مسبقآ لاكن كيف يتم الكشف على القيمة المضافة فى القيم الموجودة حيث يتم الكشف على 135786160 و فحص اذا كان اخر رقم اكبر او اصغر من اخر رقم فى القيمة المضفة حديثآ

RE: ايجاد قيمة فى listview - محمود صالح - 10-02-18

استخدم دالة القطع اخر رقمين او كما تريد

PHP كود :
TextBox1.Text = LSet(TextBox2.Text, 2) 

غير رقم 2 الى ما تريد

ثم نفذ اكوادك على هذين الرقمين سواء اكبر او اصغر

RE: ايجاد قيمة فى listview - Mohamed20 - 11-02-18

(10-02-18, 04:34 PM)محمود صالح كتب : استخدم دالة القطع اخر رقمين او كما تريد

PHP كود :
TextBox1.Text = LSet(TextBox2.Text, 2) 

غير رقم 2 الى ما تريد

ثم نفذ اكوادك على هذين الرقمين سواء اكبر او اصغر

جزاك الله خير لاكن لم تعمل هذا الكود الذى اجرب علية
كود :
       Dim li As ListViewItem
       For Each li In ListView1.Items
           If li.Text = 'checkvalue Then
               MsgBox(0)
           End If
       Next
الذى احتاجة هو 2134791 هذه قيمة داخل listview وهذه القمة التي يتم التحقق منها 2134792 مثلآ اذا كان li.Text = 213479 يتم التحقق من اخر رقم 2 هل هو اكبر من 1 او اصغر من ال 1

مثل هذا

كود :
     Dim li As ListViewItem
        For Each li In ListView1.Items
            If li.Text.Substring(0, 6) = TextBox1.Text.Substring(0, 6) Then
                If TextBox1.Text.Substring(6, 1) >= li.Text.Substring(6, 1) Then
                    MsgBox("Founded")
                    Exit For
                End If
            End If
        Next
هذا الكود يعمل لاكن هل توجد طريقة افضل ؟

RE: ايجاد قيمة فى listview - سعود الشامان - 12-02-18

السلام عليكم


يمكنك الإستعانة في هذا الموضوع


المرجع الكامل فى ( التعامل مع النصوص )

http://vb4arb.com/vb/showthread.php?tid=567

-----------------------------------------------------------------------------------------


وهذا المشروع

تستطيع إسخراج كود البحث في عناصر الليست بوكس وتحديد السطر الناتج

وحذفه او نسخه ويمكنك حذف العنصر او عدة عناصر او كل العناصر و عرض عدد العناصر و عدد العناصر المختاره ( المحدده )


http://vb4arb.com/vb/showthread.php?tid=23610&pid=114394#pid114394