Есть такой код:
- Как используя LINQ объединить эти списки?
- Или возможно как то это без LINQ можно просто сделать?
Dim a As New List(Of Integer)
Dim b As New List(Of Integer)
Dim c As New List(Of Integer)
a.Add(1)
b.Add(2)
c.Add(3)
Stack Overflow на русском — это сайт вопросов и ответов для программистов. Присоединяйтесь! Регистрация займёт не больше минуты.
Присоединиться к сообществуЕсть такой код:
Dim a As New List(Of Integer)
Dim b As New List(Of Integer)
Dim c As New List(Of Integer)
a.Add(1)
b.Add(2)
c.Add(3)
тут выбор из двух вариантов
добавлять в уже существующий массив:
Dim d As New List(Of Integer)
d.AddRange(a)
d.AddRange(b)
d.AddRange(c)
либо соединить в новый объект (функция Concat в отличии от AddRange не меняет объект, на котором вызывается):
Dim d = a.Concat(b).Concat(c).ToList()
Дополнительные сведения: Не удалось привести тип объекта "<ConcatIterator>d__59 1[System.Int32]" к типу "System.Collections.Generic.List 1[System.Int32]".
2 дек 2019 в 13:26
Воспользуйтесь функцией Union()
Dim result As List(Of Integer) = a.Union(b).Union(c).ToList()
На выбор:
A.Concat(B).Concat(C)
{ A, B, C }.SelectMany(Function(Y) Y)
Imports System
Imports System.Collections.Generic
Imports System.Linq
Public Module Module1
Public Sub Main()
Dim A As New List(Of Integer) From { 1, 2, 3 }
Dim B As New List(Of Integer) From { 4, 5, 6 }
Dim C As New List(Of Integer) From { 7, 8, 9 }
For Each X In A.Concat(B).Concat(C)
Console.Write("{0} ", X)
Next X
Console.WriteLine()
For Each X In { A, B, C }.SelectMany(Function(Y) Y)
Console.Write("{0} ", X)
Next X
End Sub
End Module