انا لدي مشروع ويحتوي على اداة listview وتحتوي الاداة على 3 اعمدة
والمعروف ان العمود الاول رقمه 0 والثاني 1
كتبت في العمود الثاني شرط اذا يوجد في رقم مثلا 5 يضع في العمود الاول صوره
والشرط لم يتحقق ماهي المشكلة
كود :
If ListView1.SelectedIndices.Count > 1 = "225" Then
listview.items.add(3)
Else
MsgBox("no")
End If
السلام عليكم اخي الكريم Dasktop
للتعامل مع الليست فيو يجب ان نفرق بين الـ Items وال SubItems
العمود الاول هو Items الرقم 0 والاعمدة البقية هي SubItems وارقامها 1-2-3-4وهكذا
بالنسبة لك انطر الى هذا الكود مع جملة For قلت له اذا كان الايتم (i) والصب ايتم رقم 2 التابع له يحمل القيمة 45
اظهر لي اسم الايتم
كود :
For i As Integer = 0 To ListView1.Items.Count - 1
If ListView1.Items(i).SubItems(2).Text = 45 Then
MsgBox(ListView1.Items(i).Text)
End If
Next
(16-07-19, 05:56 PM)ابراهيم ايبو كتب : [ -> ]السلام عليكم اخي الكريم Dasktop
للتعامل مع الليست فيو يجب ان نفرق بين الـ Items وال SubItems
العمود الاول هو Items الرقم 0 والاعمدة البقية هي SubItems وارقامها 1-2-3-4وهكذا
بالنسبة لك انطر الى هذا الكود مع جملة For قلت له اذا كان الايتم (i) والصب ايتم رقم 2 التابع له يحمل القيمة 45
اظهر لي اسم الايتم
كود :
For i As Integer = 0 To ListView1.Items.Count - 1
If ListView1.Items(i).SubItems(2).Text = 45 Then
MsgBox(ListView1.Items(i).Text)
End If
Next
اخي ابراهيم الكود لا يعمل
واكتشفت طريقة اسهل بدل من ان نستخدم for
انا لدي في imagelist صور باارقام محدده
وفي العمود الثاني ارقام مثلا اريد اذا العمود الثاني فيه 11 يضع في العمود الاول الصوره
نجح معي الكود واستخدمت الكود التالي
list.imageindex = 11
المطلوب كيف يكون ال imageindex يساوي ارقام العمود الثاني
مثلا
list.imageindex = listview.items(2).text
شكراً أخي ابراهيم
إذا أردت أن يتم اختيار الصورة أثناء الإضافة مثل
PHP كود :
Dim s As String = 5 '-- الرقم الذي تريد إضافته --'
Dim i As Integer = Val(s) '-- تحديد رقم الصورة --'
ListView1.Items.Add(New ListViewItem(s, i))
إذا فعلت الخاصية LabelEdit ثم قمت بتغيير قيمة الخلية من خلال النقر الثلاثي على الخلية
فهذا الكود في الحدث AfterLabelEdit يغير الصور حسب القيمة الجديدة
PHP كود :
Private Sub ListView1_AfterLabelEdit(sender As Object, e As LabelEditEventArgs) Handles ListView1.AfterLabelEdit
Dim i As Integer = Val(e.Label)
ListView1.Items(e.Item).ImageIndex = i
End Sub
أخي ابراهيم
إذا كان هنا استفسار في هذا الكود فأخبرني
نعم اخي الحازمي بارك الله فيك