Bueno les dejo esta funcion k sirve para obtener los todos los items seleccionados en una listview con la propriedade MultiSelect.
Se probaren obtener de la forma normal (como kuando lo hacen con solo un item) podran ver k no se puede xD
Por eso aki esta la funcion:
Private Function GetSelected(ListView As Control) As String
Dim i As Integer
For i = ListView.ListItems.Count To 1 Step -1
If ListView.ListItems(i).Selected = True Then
GetSelected = ListView.ListItems.Item(i).Text & GetSelected
'Con esto sakan el nombre del item
'pero pueden hacerlo de forma a obtener matriz, icono, etc...
End If
Next i
End Function
Para los newbies, se usa la funcion asi (por ejemplo):
Private Sub Command1_Click()
Text1.Text = GetSelected(nombre de la listview)
End Sub
Espero k les sirva
Salu2
Autor