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,