挿入する位置を指定してコレクションに格納されている内容をListへ挿入したい場合にはInsertRangeメソッドを使うことが出来ます。
InsertRangeメソッドを使って複数の要素を一度にListへ挿入する
Imports System
Imports System.Collections.Generic
Class Sample
Shared Sub Main()
' 初期状態でいくつか要素が格納されているListを作成
Dim list As New List(Of String)(New String() {"Dave", "Eve"})
' 挿入したい要素を含む配列
Dim arr As String() = {"Alice", "Bob", "Charlie"}
' Listのインデックス1以降に複数の要素を挿入する (配列に含まれている内容をすべて挿入する)
list.InsertRange(1, arr)
Print(list)
End Sub
' Listの内容を列挙して表示する
Shared Sub Print(ByVal list As List(Of String))
For Each e As String In list
Console.Write("{0}, ", e)
Next
Console.WriteLine()
End Sub
End Class
実行結果
Dave, Alice, Bob, Charlie, Eve,
InsertRangeメソッドでコレクションの一部分だけを挿入する方法については、AddRangeメソッドでの例(§.コレクションの一部の追加)を参照してください。