Wie man erkennt, ob eine Listbox Hat Duplikate

Mitglieder-Login

InformationenVisual Basics Programmierung

Different Ways to Format Termine in… Verschiedene Möglichkeiten der Formatierung Daten in VBA schließen diejenigen für die Schaffung Datu
Wie man einen kühlen Loading Bar i… Einige Anwendungen laden Sie einfach , wenn Sie sie starten. Andere mit Stil laden. Sie können Ihre
Wie Unreal Engine 3 verwenden Unreal Engine 3 ist ein Programm verwendet, um Videospiele zu entwerfen. Diese Spiele sind so konzip
Wie man ein Formular mit Scrolling … Beim Lernen von Code in Visual Basic 6.0 ( VB6 ) ist es hilfreich zu verstehen, wie Scrollbalken zu

Programming

HOME

* Computer Wissen >> Programming >> Visual Basics Programmierung >> .

Wie man erkennt, ob eine Listbox Hat Duplikate

Herausfinden , ob ein ListBox hat doppelte Elemente hilft Ihnen wissen , wie man den entsprechenden Code ausführen, um sie zu entfernen. Oft Programmierer den Fehler machen, Auffüllen eines ListBox mit doppelten Daten aus der Datenbank . Es ist am besten , um Duplikate zu beseitigen , wenn Sie die Daten abzufragen. In VB , können Sie die Items-Eigenschaft des ListBox-Steuerelement , um eine Liste der Elemente derzeit in der ListBox gespeichert zu bekommen. Sobald Sie den Hinweis, dass Sie leitet zu der Liste , können Sie eine Schleife durch die Elemente , um Duplikate zu finden. Things You
Microsoft Visual Studio
brauchen anzeigen Weitere Anweisungen
1

Starten Sie Microsoft Visual Studio , klicken Sie auf "Neues Projekt" aus dem linken Bereich des Bildschirm Ihres Computers , und erweitern " Visual Basic " unter " Installierte Vorlagen . " Klicken Sie "Windows " und doppelklicken Sie auf "Windows Forms Application" aus der Mitte der Dialog um ein neues Projekt zu erstellen.
2

Doppelklicken Sie auf " ListBox " ein neues Listenfeld hinzufügen Ihre Form . Klicken Sie doppelt auf "Button" , um eine neue Schaltfläche, um Ihre Form hinzufügen.
3

Doppelklicken Sie auf das Formular , um eine Form Load-Ereignis zu erstellen , und fügen Sie den folgenden Code , um einige Einzelteile einschließlich Duplikate Ihre ListBox
4

Wechseln Sie wieder in "Form" Design-Ansicht und doppelklicken Sie auf " Button1 ", um eine Click-Ereignis für diese Schaltfläche zu erstellen. Fügen Sie den folgenden Code, um keine doppelten Elemente durch das " Direktfenster " gefunden angezeigt und zeigt eine Meldung an den Benutzer :

Me.ListBox1.Sorted = True

Me.ListBox1.Refresh ()

Dim index As Integer Dim

dupFound As Boolean Dim

itemcount As Integer = Me.ListBox1.Items.Count

Wenn itemcount > 1 Then

Dim lastItem As String = Me.ListBox1.Items ( itemcount - 1) german

index = itemcount - 2 To 0 Step -1

Wenn Me.ListBox1.Items (Index) = lastItem Dann

dupFound = = Me.ListBox1.Items (Index)

End If Next

End If

Wenn dupFound Dann

MessageBox.Show ( "Dubletten wurden in ListBox gefunden.")

Else

MessageBox.Show (" Keine Duplikate gefunden.") End If

5 < p> Presse "F5 ", um Ihr Programm ausführen . Klicken Sie auf " Button1 ", um die Duplikate zu löschen und eine Meldung angezeigt, die angibt, ob Duplikate waren oder wurden nicht gefunden.