Πώς να αφαιρέσει Αντίγραφα από ένα ArrayList

Μια ArrayList είναι ένα NET αντικείμενο που χρησιμοποιείται για να κρατήσει μια σειρά αξιών . . Η σειρά μπορεί να αποτελείται από λίγα μόνο τιμές ή μπορεί να περιέχει αρκετές εκατοντάδες αξίες. Αν θέλετε να εντοπίσετε αντίγραφα , ένα . Επαναλαμβάνει NET βρόχο μέσα σε κάθε τιμή του πίνακα και τους ελέγχους που ενάντια σε όλες τις άλλες τιμές του πίνακα . Εκτός από την αλλαγή σημαίας τιμές για τα αντίγραφα , αυτό σας βοηθά να φιλτράρετε τις τιμές που περιέχονται στη σειρά σας . Οδηγίες
Η 1

Δημιουργήστε το ArrayList και εισάγετε κάποιες τιμές . Στο παρακάτω παράδειγμα , μια σειρά από ακέραιες τιμές είναι κωδικοποιημένο σε εφαρμογή :

λίστα Dim As New ArrayListlist.Add ( 1 ) list.Add ( 2 ) list.Add ( 2 ) list.Add ( 3 ) 2

Δημιουργήστε το αρχικό βρόχο . Αυτός ο βρόχος περνά από κάθε αριθμό στη λίστα . Περιλαμβάνει ένα δεύτερο βρόχο που συγκρίνει κάθε τιμή σε όλους τους άλλους αριθμούς στη συστοιχία . Ο ακόλουθος κώδικας δείχνει πώς μπορείτε να δημιουργήσετε τον αρχικό βρόχο :

Για i As Integer = 0 Για να list.Count - τιμή 1Dim = λίστα ( i ) Loop
εικόνων 3

Ρυθμίστε το δεύτερο loop . Ο δεύτερος βρόχος λαμβάνει την τιμή στον πρώτο βρόχο και τη συγκρίνει με όλες τις άλλες τιμές στην ArrayList . Αν βρεθεί ένα διπλούν , αποστέλλεται ένα μήνυμα στο χρήστη. Το παρακάτω σας δείχνει πώς να βρούμε τα διπλότυπα :

Για i As Integer = 0 Για να list.Count - τιμή 1Dim = λίστα ( i ) Για j As Integer = 0 Για να list.Count - τιμή 1Αν = λίστα ( ι ) ThenResponse.Write ( " Αντίγραφο Υπάρχει ") End IfLoopLoop
Η
εικόνων