leer elementos seleccionados de un list box

kike wrote:

tengo un listbox con multiples filas seleccionadas me interesa cojer
el value de cada una de las lineas seleccionada
como recorrermelo?

La propiedad SelectedItems te devuelve una coleccion con los items
seleccionados.

Eduardo A. Morcillo [MS MVP VB]
http://www.mvps.org/emorcillo

Bueno ya lo consegui para quien le interese dejo el codigo aqui
Dim Lis As System.Data.DataRowView

Try

For i As Integer = 0 To LstInstalaciones.SelectedItems.Count - 1

LstInstalaciones.SelectedIndex = i

Lis = LstInstalaciones.SelectedItems.Item(i)

MsgBox(Lis.Row.ItemArray(0))

Next

Catch ex As Exception

MsgBox(ex.Message)

End Try







"kike" escribió en el mensaje
news:O1xhTh#

tengo un listbox con multiples filas seleccionadas me interesa cojer el
value de cada una de las lineas seleccionada
como recorrermelo?
gracias

Gracias Eduardo aunque el problema era que no podia avanzar por el listbox
asi que cree una variable System.Data.DataRowView que me guardaba el
registro y podria acceder al id de la instalacion seleccionada en este caso
por cierto esta linea sobra " LstInstalaciones.SelectedIndex = i" (era de
pruebas anteriores)
Lis.Row.ItemArray(0)) y con esta lo que hago es situarme en la posicion 0
que es donde esta el id de la instalacion seleccionada
codigo definitivo:

Private Sub CargaVariable()

Dim Lis As System.Data.DataRowView

Dim cadena As String 'metere todos los id's que enviare a un procedimiento
almacenado en otra parte

Try

Lis = LstInstalaciones.SelectedItems.Item(0)

cadena = "(" + CStr(Lis.Row.ItemArray(0))

For i As Integer = 1 To LstInstalaciones.SelectedItems.Count - 1

Lis = LstInstalaciones.SelectedItems.Item(i)

cadena = cadena + "," + CStr(Lis.Row.ItemArray(0))

Next

cadena = cadena + ")"

MsgBox(cadena)

Catch ex As Exception

MsgBox(ex.Message)

End Try

End Sub



"kike" escribió en el mensaje
news:u4s8vY$

Bueno ya lo consegui para quien le interese dejo el codigo aqui
Dim Lis As System.Data.DataRowView

Try

For i As Integer = 0 To LstInstalaciones.SelectedItems.Count - 1

LstInstalaciones.SelectedIndex = i

Lis = LstInstalaciones.SelectedItems.Item(i)

MsgBox(Lis.Row.ItemArray(0))

Next

Catch ex As Exception

MsgBox(ex.Message)

End Try







"kike" escribió en el mensaje
news:O1xhTh#
> tengo un listbox con multiples filas seleccionadas me interesa cojer el
> value de cada una de las lineas seleccionada
> como recorrermelo?
> gracias
>
>