While AddRange always places elements at the end of the List, InsertRange can insert those elements at any valid index.
Module Module1
Sub Main()
' Part 1: create data collections.
Dim list = New List(Of Integer)({ 1, 2, 3, 4 })
Dim array = { 500, 600, 700 }
' Part 2: call InsertRange and display the elements afterwards.
list.InsertRange(1, array)
For Each value in list
Console.WriteLine($
"ELEMENT: {value}")
Next
End Sub
End Module
ELEMENT: 1
ELEMENT: 500
ELEMENT: 600
ELEMENT: 700
ELEMENT: 2
ELEMENT: 3
ELEMENT: 4