seleccion multiple listbox, como saber los seleccionados?

[RootK]

Solo para complementar podría tambien quedar así

Código:

Dim result As Integer() = ListBox1.GetSelectedIndices()
            Dim vec As New List(Of String)
            For i As Integer = 0 To result.Length - 1
                vec.Add(ListBox1.Items.Item(i).Value)
            Next

Salu2