Futura
|
PORTO FERREIRA
SP - BRASIL
|
|
ENUNCIADA !
|
|
|
Postada em 26/07/2006 10:37 hs
estou usando a seguinte instrução para percorrer um listview, e remover os itens cujo box esteja marcado, mas retorna um erro: For i = 1 To frmpagar.lstnome.ListItems.Count
If frmpagar.lstnome.ListItems(i).Checked = True Then
frmpagar.lstnome.ListItems.Remove frmpagar.lstnome.ListItems(i).Index
End If
Next o que posso fazer ???? |
|
|
|
|
|
|
|
Postada em 26/07/2006 11:10 hs
qdo vc remove os índices são alterados... tenta assim colega: LV: For i = 1 To frmpagar.lstnome.ListItems.Count
If frmpagar.lstnome.ListItems(i).Checked = True Then
frmpagar.lstnome.ListItems.Remove frmpagar.lstnome.ListItems(i).Index goto LV
End If
Next T+ |
|
|
|
caco
|
SP - BRASIL
|
|
|
ENUNCIADA !
|
|
|
Postada em 26/07/2006 11:33 hs
Faz um loop inverso. For i = frmpagar.lstnome.ListItems.Count To 1 Step -1
If frmpagar.lstnome.ListItems(i).Checked Then
frmpagar.lstnome.ListItems.Remove i
End If
Next
Messenger: vbdev@uol.com.br
|
|
|
|
Futura
|
PORTO FERREIRA
SP - BRASIL
|
|
Postada em 26/07/2006 11:58 hs
ghost e caco, brigado pela força, optei pelo código do caco q é + enxuto, mas naum posso deixar de agradecer ao ghost, que ja me deu muita força aki no forum. |
|
|
|
