seleccionar x defecto

09/11/2005 - 09:37 por Sonia | Informe spam
como puedo hacer para q en un formulario donde al pulsar un boton se rellena
un listview, que salga x defecto la 1º linea del listview seleccionada?

y se podria hacer tb q salieran todas las lineas del listview seleccionadas?

gracias!

Preguntas similare

Leer las respuestas

#1 Jorge Serrano [MVP VB]
10/11/2005 - 09:59 | Informe spam
Hola Sonia,

suponiendo que tienes los siguientes elementos cargados en tu ListView:

ListView1.Items.Add("Uno")
ListView1.Items.Add("Dos")
ListView1.Items.Add("Tres")

Para seleccionar el segundo elemento, escribiríamos:
ListView1.Items(1).Selected = True

'Para seleccionar todos los elementos del control, los recorreríamos y los
seleccionaríamos así:
Dim I As Integer
For I = 0 To ListView1.Items.Count - 1
ListView1.Items(I).Selected = True
Next


Un saludo,
Jorge Serrano Pérez
Microsoft MVP VB.NET
PortalVB.com
http://www.portalvb.com/
Weblog de Jorge Serrano
http://weblogs.golemproject.com/jorge/


"Sonia" wrote:


como puedo hacer para q en un formulario donde al pulsar un boton se rellena
un listview, que salga x defecto la 1º linea del listview seleccionada?

y se podria hacer tb q salieran todas las lineas del listview seleccionadas?

gracias!




Respuesta Responder a este mensaje
#2 Sonia
10/11/2005 - 11:22 | Informe spam
gracias x contestar
eso lo podria utilizar para ahcer lo siguiente?

Lo q kiero hacer es buscar el máximo del idlinea y el máximo del idpedido y
después recorrer el listview y para cada linea grabar junto con esos 2 id el
codigo del articulo(col1 del listview) y la cantidad (col4 del listview)



tabla de LINEA_PEDIDO tiene

Idlinea,idpedido,codart,cantidad



Lo hago de este modo pero me da error de fuera del rango

Sabes pq puede ser?





Dim id As String 'codart

Dim precio, cantidad, linia As Double

'el num pedido ya lo tengo de antes



mysql = "select max(ID_LINEA) from LINEA_PEDIDO"

nuevo.BuscarValor(mysql, "LINEA_PEDIDO", linia)

linia = linia + 1



Dim I As Integer

For I = 0 To prueba.Items.Count - 1

ListView1.Items(I).Selected = True

'codigo del articulo

id = prueba.SelectedItems(0).SubItems(0).Text

cantidad = prueba.SelectedItems(0).SubItems(3).Text



mysql = "Insert into LINEA_PEDIDO values(" & linia & "," & pedido & ",'"
& id & "'," & cantidad & ")"

gestiona.Gestionar(mysql)

Next





"Jorge Serrano [MVP VB]"
escribió
en el mensaje news:
Hola Sonia,

suponiendo que tienes los siguientes elementos cargados en tu ListView:

ListView1.Items.Add("Uno")
ListView1.Items.Add("Dos")
ListView1.Items.Add("Tres")

Para seleccionar el segundo elemento, escribiríamos:
ListView1.Items(1).Selected = True

'Para seleccionar todos los elementos del control, los recorreríamos y los
seleccionaríamos así:
Dim I As Integer
For I = 0 To ListView1.Items.Count - 1
ListView1.Items(I).Selected = True
Next


Un saludo,
Jorge Serrano Pérez
Microsoft MVP VB.NET
PortalVB.com
http://www.portalvb.com/
Weblog de Jorge Serrano
http://weblogs.golemproject.com/jorge/


"Sonia" wrote:

>
> como puedo hacer para q en un formulario donde al pulsar un boton se


rellena
> un listview, que salga x defecto la 1º linea del listview seleccionada?
>
> y se podria hacer tb q salieran todas las lineas del listview


seleccionadas?
>
> gracias!
>
>
>
>

email Siga el debate Respuesta Responder a este mensaje
Ads by Google
Help Hacer una preguntaRespuesta Tengo una respuesta
Search Busqueda sugerida