remover elem de arrayList

[amvm]

Boa noite,

Estou com duvidas na remoção de um elemento de um arrayList. Já fiz debug e os objectos a comparar são iguais e mesmo assim não remove. Existe uma outra forma de comparar objectos?

   Public Sub removePeople(ByVal p As Pessoa)
    Dim i As Integer
    For i = 0 To contacts.Count - 1
	    If contacts.Item(i) Is p Then
		    contacts.Remove(i)
	    End If
    Next
   End Sub

cumps

[ribeiro55]

Não remove e bem, porque estás a pedir-lhe para remover o primeiro integer com o valor de i que ele encontrar.

O método Remove é usado para remover a primeira ocorrência de um objecto, ou seja, podes fazer directamente um Remove(p).

No entanto, se quiseres manter o ciclo por alguma razão, tens de usar o método RemoveAt(i), esse sim, atende ao índice.

[amvm]

olá

Mas o problema nao é o método remove... quer dizer pelos vistos também era, mas ele nunca aceita a condição (if...) mesmo sendo objectos iguais, diz sempre que nao, e claro, não remove

[jlpcalado]

Boa Tarde.

"mesmo sendo objectos iguais"

o que se passa é que os objetos, apesar de possuírem as mesmos valores das propriedades não são iguais.

2 objetos (instâncias da uma classe) só são iguais se tiverem a mesma referência (excepto para Strings...(?!))

Uma solução possível é criar na classe 'Pessoa' uma Propriedade que aglutine o conjunto das outras a comparar e fazer a comparação entre os objetos com base nessa propriedade.

Por exemplo:

If contacts.Item(i).PropAComparar = p.PropAComparar ...

[ribeiro55]

Também podes implementar directamente um Operator = na classe e depois testar igualdade normalmente.