Feedback

VB - Doppelte Einträge löschen

Veröffentlicht von am 20.06.2011
(0 Bewertungen)
Doppelte Eintäge mit Hilfe einer List(Of String) löschen.
Zum Test bitte eine Listbox auf der Form1 plazieren.
GFU-Schulungen  [Anzeige]

Visual Studio Team Foundation Server 2017/2015 (TFS) - Komplett 

VB.NET 2017/2015/2013 Einführung

Das Seminar befähigt Sie zur eigenständigen Entwicklung von anwenderorientierten Programmen in VB.NET, worin auch der Einsatz von Datenbanken enthalten ist.

Public Class Form1

    Private Sub Form1_Load(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles MyBase.Load
        Dim OldList As New List(Of String)
        Dim NewList As New List(Of String)


        OldList.Add("aaaa".ToString)
        OldList.Add("aaaa".ToString)
        OldList.Add("cccc".ToString)
        OldList.Add("aaaa".ToString)
        OldList.Add("bbbb".ToString)
        OldList.Add("aaaa".ToString)


        NewList = DelDblEntr(OldList)
        ListBox1.Items.AddRange(NewList.ToArray)

    End Sub


Private Function DelDblEntr(ByVal RntyList As List(Of String)) As List(Of String)
        DelDblEntr = Nothing

        DelDblEntr = RntyList.Distinct().ToList()

End Function
Abgelegt unter Strings, Array, List(Of String).

Kommentare zum Snippet

 

Logge dich ein, um hier zu kommentieren!