1: 2: 3: 4: 5: 6: 7:
For Each f In rc.Fields Try j = Me.ListView1.FindItemWithText(f.Name).Index If (j <> -1) Then Me.ListView1.Items(j).Checked = True Catch ex As Exception End Try Next