Verify rows from Listview checked

Hi

I have a Listview with checkbox, I want all rows from Listview and verify what are checked

How can I do It ?


Tia

Loop through all items in the ListView

VB Code:

Private Sub Command1_Click()
    Dim oItem As ListItem
    For Each oItem In Me.ListView1.ListItems
        If oItem.Checked Then
            'do something
        End If
    Next
End Sub

Another way

VB Code:

Dim i As Long
For i = 1 To ListView1.ListItems.Count
    If ListView1.ListItems.Item(i).Checked = True Then
       'do something
    End If
Next