Listview

Hur gör man så man loopar igenom en listview

typ så här fast med en listview

Dim i
For i = 0 To lstName.ListCount - 1
lstName.ListIndex = i
Görnågot
Next i

Otestat men prova:

Dim i

For i = 1 To ListView.ListItems.Count
    ' Gör något
Next i

Tog bort .ListIndex = i eftersom jag anser den onödig.

ok tack ska testa...

Nexus de funkade inge bra men löste det så här.

    x = 1
    y = ListView1.ListItems.Count
   
    Do Until x = y + 1
    
ListView1.SelectedItem = ListView1.ListItems(x)
Adress = ListView1.SelectedItem.Text
PingAdress (Adress)
        x = x + 1
    Loop

Men nu har jag ett annat problem.
när den loppar igenom så beroende på vad det står i listview så ska den skriva Yes eller No i nästa kolumn hur gör man det.
Jag bifogar en bild.
Där det står online ska det addas en om det står t.ex. PsyDonia.com i URL rutan så ska det i Online stå Yes och där det står Psydon.com så ska det addas No i Online Rutan
Nån som förstår.