listview (تحديد العناصر و التحرك بينها)

ضبط الخاصية Me.ListView1.HideSelection = False

كيف اعلم على جميع cheackboxs لجميع العناصر ؟

        For Each itm As ListViewItem In Me.ListView1.Items

            itm.Checked = True
        Next

كيف اتحرك بين العناصر بالكود

form_load()

Dim i As Integer = -1

Button_click()

        i +=1
        Select Case i
            Case 0
                Me.ListView1.Items(i).Selected = True
            Case Me.ListView1.Items.Count
                i = Me.ListView1.Items.Count -1
            Case Else
                Me.ListView1.Items(i-1).Selected = False
                Me.ListView1.Items(i).Selected = True

        End Select

استخدمى

for each أفضل واسهل لكى