linq, List(of string), doppelte werte

[Exc-JDBI]

Guten Abend Community

Ist es möglich mit Linq die Einträge in lst1 in lst2 zu schreiben, wobei in lst2 keine doppelten Einträge vorhanden sein dürfen?


[highlight=vbnet]
Private Sub ListExtend(ByVal lst1 As List(Of String), ByVal lst2 As List(Of String))
'In der lst2 dürfen keine doppelte Einträge vorhanden sein
If lst1.Count > 0 Then lst2.AddRange(From x In lst1)
End Sub
[/highlight]


Danke für die Hilfe.


Freundliche Grüsse

exc-jdbi

[Ralf Jansen]

lst2.AddRange(lst1.Distinct())

[Exc-JDBI]

Guten Abend Ralf Jansen

Funktioniert leider nicht bei mir hab hier ein Beispiel

[highlight=vbnet]
Module Module1
Sub Main()
Dim lst1 As New List(Of String)({"Meyer", "Friedrich", "Steiner", "Müller", "Fischer"})
Dim lst2 As New List(Of String)({"Schönhans", "Meier", "Schraner", "Steiner", "Köhlin"})
ListExtend(lst1, lst2)
End Sub
Private Sub ListExtend(ByVal lst1 As List(Of String), ByVal lst2 As List(Of String))
'In der lst2 dürfen keine doppelte Einträge vorhanden sein
If lst1.Count > 0 Then lst2.AddRange(lst1.Distinct())
End Sub
End Module
[/highlight]

Danke für die Hilfe

[Ralf Jansen]

Die Frage hatte ich auch anders verstanden als deinen jetzigen Code

[HIGHLIGHT=vb.net]Private Sub ListExtend(ByVal lst1 As List(Of String), ByVal lst2 As List(Of String))
Dim list = lst2.Union(lst1).Distinct().ToList()
lst2.Clear()
lst2.AddRange(list)
End Sub
[/HIGHLIGHT]

[Exc-JDBI]

Hab ich mir schon gedacht, darum gleich mein Beispiel.

Funktioniert bestens.

Vielen Dank und schönen Feierabend.

Freundliche Grüsse

exc-jdbi