Buscar Items Repetidos En Listbox

[Quemero]

hola tengo que buscar los items repetidos en un listbox que tiene numeros.
La cosa es que quiero limitar el numero de repeticiones que me busque, y si se puede tambien hasta que item buscar.

Por ejemplo, quiero que me diga en los ultimos 30 items de la lista, si hay algun numero que figure solamente 4 veces (ni mas ni menos).
Si ese mismo numero tiene una repeticion mas en el item nº 34, entonces que me lo ignore, o sea que no me cuente 5 repeticiones, sino 4 solamente, porque en los ultimos 30 items hay 4 nada mas...

les agradeceria mucho si pueden ayudar ya que estoy hace unos dias con esto y no le encuentro la vuelta. chau

[hernanmdq]

Por lo menos pon algo del codigo para empezar. O quieres que te lo hagamos todo??

[lop7]

bueno pana esto hacia lo siguiente....
buscaba que items se repetia en una lista dandole el limite que el queria
y los que encontraba en ese rango los eliminaba es para que agarres la idea de lo que puedes hacer

Código:

Private Sub Command1_Click()
Dim r As Integer
Dim s As Integer

Dim limite1, limite2 As Integer


limite1 = Text1.Text 'Poner aquí el elemento hasta el que hay que revisar
limite2 = Text2.Text 'el final del rango... revisa que no este fuera del intervalo

limite1 = limite1 - 1

If limite1 > 0 And limite1 < limite2 Then

If limite2 > limite1 And limite2 < List1.ListCount - 1 Then
For r = limite1 To limite2
For s = r + 1 To limite2
If List1.List(r) = List1.List(s) Then
On Error Resume Next
List1.RemoveItem (s)
limite2 = limite2 - 1
End If
Next 's
Next 'r
End If
End If
End Sub

bueno se que te ayudara en algo

saludos...