Recorrer con For en ListView

[cmunoz]

Estimados Soy nuevo en la programación con el control listview, he actualizado mi listbox y tengo el siguiente problema
CODIGO QUE TENIA EN EL LISBOX
with Listbox1
For i = 0 To Me.ListBox1.ListCount - 1
If .ListCount = .ListIndex + 1 Then: Exit Sub
.ListIndex = .ListIndex + 1
Call PASAR_DATOS_CREDENCIAL
Call CREAR_CREDENCIAL
Next i
end with

CODIGO ACTUAL: EL CUAL ME DA ERROR DICE: "error 383 property is read-only"
With Me.LTV_REGISTRO
If Answer = vbYes Then
For i = 1 To Me.LTV_REGISTRO.ListItems.Count

If .ListItems.Count = .ListItems.Item(i).Index + 1 Then: Exit Sub
.ListItems.Item(i).Index = .ListItems.Item(i).Index + 1

Call PASAR_DATOS_CREDENCIAL
Call CREAR_CREDENCIAL_PDF
Next i



End If
End With


si alguien pudiera ayudarme con esto.. por favor

[jdc2000]

Translation:

Dear I am new to programming with the listview control, I have updated my listbox and I have the following problem
CODE I HAD IN THE LISBOX
if someone could help me with this .. please

[westconn1]

even with the translation, this is pretty had to understand

on which line does the error occur?, what is the value of i and the value of .listitems.count