Listview en un array

[5v5]

Buen dia....esto es para permitir la multiseleccion
With ListView1
'Permitir múltiple selección
.MultiSelect = True
' Para que al perder el foco,
' se siga viendo el que está seleccionado
.HideSelection = False
End With


y para meterlos en un array
'el ciclo enpiza de 1 hasta el total de items de tu listview

For x = 1 To ListView1.ListItems.Count
'si el item(i) esta seleccionado se procede

If ListView1.ListItems(x).Selected Then

' se introduce los datos del item seleccionado
Array(x) = ListView1.ListItems.Item(x).SubItems(1)

' aqui depende de lo que necesitas, si necesitas almacenar solo el_ nombre ..pues con un array() simple es suficiente..pero si lo que necesitas_ almacenar todos los datos solo tienes que ser un array(,)..e insertar otro_ for...para almacenar el valor de la columna....


End If

Next

Espero te sirva...y aclaro que no soy un experto....por tal motivo me gustaria saber si me he equivocado en algo.....o si hay otra forma mejor...
hasta pronto