[VB8]Elementi array

[kkvm]

Salve a tutti e grazie in anticipo per l'aiuto:
il mio problema è il seguente, premetto che sono un principiante di visual basic 2008, in ogni caso, io una volta generati 100 numeri da 1 a 100 e scritti in una listbox, devo ordinarli, fin qui no problem, poi dovrei visualizzare in 3 label rispettivamente: i numeri che compaiono più volte(quelli doppi in sostanza i numeri uguali), quelli che compaiono una sola volta, quelli che nell'intervallo 1 a 100 della listbox sono assenti.
Vi posto quanto fatto da me:

        For i = 0 To 100
            For j = 0 To 100
                If v(j) = i Then
                    conta = conta + 1
                End If
            Next j
            If conta = 0 Then
                nessuno = nessuno + 1
            ElseIf conta = 1 Then
                unosolo = unosolo + 1
            ElseIf conta > 1 Then
                piudiuno = piudiuno + 1
            End If
            conta = 0

        Next i
        Label1.Text = unosolo
        Label2.Text = nessuno
        Label3.Text = piudiuno

il problema è che prima cosa singoli e assenti sono sbagliati, per i doppi credo vada ma il vero problema è che per ogni label me ne visualizza solo uno e non tutti quelli doppi, singoli e assenti. Ne viene scelto uno e mi scrive solo quello praticamente. Mi spiego meglio:
se ho per esempio il 39 e il 23 che compaiono 8 volte, il sistema mi scrive solo uno dei due numeri e non tutti e due.
L'unica cosa, se mi date una mano, è l'usare il for e non altre funzioni particolari.
Grazie a tutti

[LeleFT]

Come espressamente richiesto dal regolamento interno che ti invito a leggere (discussione in rilievo sul forum) il codice va postato all'interno degli appositi tag CODE.

C'è da dire che tutte le versioni di VB vengono trattate nel forum "Visual Basic e .NET Framework".

Sposto.


Ciao.