Imports System
Imports System.Collections.Generic
Class Program
Public Shared Sub Main()
Dim source As List(Of Integer) = New List(Of Integer) From {
10,
20,
30,
40,
50,
60,
70
}
Dim target As List(Of Integer) = New List(Of Integer) From {
1,
2,
3,
4
}
Dim rangeToInsert As List(Of Integer) = source.GetRange(2, 3)
target.InsertRange(1, rangeToInsert)
Console.WriteLine(String.Join(", ", target))
End Sub
End Class
' run
'
' 1, 30, 40, 50, 2, 3, 4
'