Public Class Form1
    Dim items As New Dictionary(Of ListViewItem, List(Of ListViewItem))
 
    Private Sub Form1_Load(ByVal sender As System.Object, ByVal e As _
      System.EventArgs) Handles MyBase.Load
        Dim items1 As New List(Of ListViewItem)
        Dim item As String
        Dim subitem As String
 
        For i As Integer = 0 To 2
            item = "Item " & i
            subitem = "Subitem " & i
            ListView1.Items.Add(item).SubItems.Add(subitem)
            For x As Integer = 0 To 2
                ListView2.Items.Add(item).SubItems.Add(subitem)
                items1.Add(ListView2.Items.Item(x))
            Next
            items.Add(ListView1.Items.Item(i), items1)
        Next
    End Sub
 
    Private Sub ListView1_SelectedIndexChanged(ByVal sender As System.Object, _
      ByVal e As System.EventArgs) Handles ListView1.SelectedIndexChanged
        Dim lw As ListView = CType(sender, ListView)
        Dim selectedItem As ListViewItem = lw.FocusedItem
 
        With ListView2
            .BeginUpdate()
            .Items.Clear()
            .Items.AddRange(items(selectedItem)) 'hier habe ich ein Problem das 
            ' ich so nicht in den griff bekomme
            .EndUpdate()
        End With
    End Sub
End Class

Fehler bei der Überladungsauflösung, da keine zugreifbare "AddRange" mit diesen _
  Argumenten aufgerufen werden kann: 
    'Public Sub AddRange(items As 
    ' System.Windows.Forms.ListView.ListViewItemCollection)': Der Wert vom Typ _
    "System.Collections.Generic.List(Of System.Windows.Forms.ListViewItem)" _
    kann nicht in "System.Windows.Forms.ListView.ListViewItemCollection" _
    konvertiert werden.
    'Public Sub AddRange(items() As System.Windows.Forms.ListViewItem)': Der _
    Wert vom Typ "System.Collections.Generic.List(Of" & _
    "System.Windows.Forms.ListViewItem)" kann nicht in "1-dimensionales Array" & _
    "von System.Windows.Forms.ListViewItem" konvertiert werden.