كيف اتعامل مع عدة عناصر محددة (في الListview)

اخي الكريم اولا يجب ان تضبط خاصية ال multiselect للاداة وتجعلها True

وعشان تختار عدة عناصر من الاداة اضغط الزر CTRL واختار العناصر التي ترديها

اما بالنسبة لتنفيذ كود معين على العناصر المختارة عليك اولا تحديد ال INDEX لكل عنصر اخترته صحيح ؟ نعم اكيد وبدون ال INDEX صعب تتحرك اي حركة او تسوي شي

واليك الكود اللازم لتحديد العناصر التي اخترتها

For i = 1 To lv1.ListItems.Count
If lv1.ListItems.item(i).Selected Then
MsgBox i
End If
Next

طبعا الرسالة التي ستظهر تحمل رقم العنصر المختار

وعشان تحذف العناصر التي اخترتها من الاداة ولكنها لن تنحذف من المصر اليك الكود التالي

For i = 1 To lv1.ListItems.Count
If i > lv1.ListItems.Count Then
Exit Sub
End If
If lv1.ListItems.item(i).Selected Then
lv1.listitems.Remove(i)

End If
Next

اتمنى يفيدك الكود الي كتبتو

جزيت خيراً اخي عني وعن كل من استفاد

هذا هو الكود المطلوب بالظبط

والسلام عليكم