Visual Basic - listbox ayuda por favor

Life is soft - evento anual de software empresarial
   
Vista:

listbox ayuda por favor

Publicado por David (14 intervenciones) el 08/11/2007 15:34:13
Hola soy nuevo en este foro y me estoy volviendo loco para solucionar esto: Tengo una aplicacion para controlar pedidos con un listbox (se que es mejor un listview pero ...). El caso es que quiero que cada elemento que seleccione de ese listbox se quede tachado, o con un simbolo o algo que lo diferencie de los demas para guardarlo despues en una base de datos y poder recuperar su estado.
espero me podais ayudar por favor. Gracias y un saludo
Valora esta pregunta
Me gusta: Está pregunta es útil y esta claraNo me gusta: Está pregunta no esta clara o no es útil
0
Responder
información
Otras secciones de LWP con contenido de Visual Basic
- Código fuente de Visual Basic
- Cursos de Visual Basic
- Temas de Visual Basic
- Chat de Visual Basic
información
Códigos de Visual Basic
- Escuchar la radio
- msgbox
- Colores RGB

RE:listbox ayuda por favor

Publicado por El conejo (124 intervenciones) el 08/11/2007 15:42:26
Hola.

¿La propiedad de estilo de listbox no te sirve?
Luego lo diferencias con list1.selected(indice)= true 'o false segúm lo que vayas necesitando.

Saludos.
Valora esta respuesta
Me gusta: Está respuesta es útil y esta claraNo me gusta: Está respuesta no esta clara o no es útil
0
Comentar

RE:listbox ayuda por favor

Publicado por David (14 intervenciones) el 08/11/2007 15:46:40
soy un poco novato, que es eso de la propiedad de estilo?
en tu ejemplo pone list1.selected(indice)= true que significa lo de indice?.

lo que quiero es que solo se quede remarcada la opcion seleccionada para luego guardarla en una base de datos y asi pofder recuperarla cuando quiera.

me explico, es un listado de pedidos, conforme se van recibiendo, estos se van marcando para ese cliente. cuando se cierra ese cliente y al volver a abrirlo tienen que salir los que ya se habian marvcado. Habia pensado con fontstriletru para los items del listbox que ya estan recibidos.

Ayudame como un novato pues eso es lo que soy y si puedes poner un pequeño ejemplo pues aun mejor, aunque igualmente agradecido
Valora esta respuesta
Me gusta: Está respuesta es útil y esta claraNo me gusta: Está respuesta no esta clara o no es útil
0
Comentar

RE:listbox ayuda por favor

Publicado por El conejo (124 intervenciones) el 08/11/2007 16:06:51
ok.

Los controles tienen propiedades, algunas son ejecutables en tiempo de ejecucion y otras no.

Creas el ListBox en tu formulario, vas a la barra de propiedades y estableces el valor de "Style" como 2 (checkbox), asi tendría una lista de checkboxs.

Private Sub Form_Load()
List1.AddItem "normal"
List1.AddItem "gordo"
List1.AddItem "flaco"
End Sub

Tienes una base de datos con las caracteristicas de un cliente o lo que sea, supongo que son Boolean, que tu BD ya esta abierta y que los campos son 3:
- normal - boolean
- gordo - boolean
- flaco - boolean

if cint(rs_ado_dao_XX.("normal"))= 1 then list1.seleted(0)= true else list1.seleted(0)= false

supongamos que normal fuese 1.
y el usuario decide que no es normal, si no gordo, al momento de guardar pasaria esto:

for i = 0 to list1.listcount
if list1.selected(i)= truen then
..... rutina de guardado o actualizacion del registro
endif
next i

* rs_ado_dao_XX, no se como trabajas tu Base de Datos.
Suerte.
Valora esta respuesta
Me gusta: Está respuesta es útil y esta claraNo me gusta: Está respuesta no esta clara o no es útil
0
Comentar

RE:listbox ayuda por favor

Publicado por El conejo (124 intervenciones) el 08/11/2007 16:08:28
ok.

Los controles tienen propiedades, algunas son ejecutables en tiempo de ejecucion y otras no.

Creas el ListBox en tu formulario, vas a la barra de propiedades y estableces el valor de "Style" como 2 (checkbox), asi tendría una lista de checkboxs.

Private Sub Form_Load()
List1.AddItem "normal"
List1.AddItem "gordo"
List1.AddItem "flaco"
End Sub

Tienes una base de datos con las caracteristicas de un cliente o lo que sea, supongo que son Boolean, que tu BD ya esta abierta y que los campos son 3:
- normal - boolean
- gordo - boolean
- flaco - boolean

if cint(rs_ado_dao_XX.("normal"))= 1 then list1.seleted(0)= true else list1.seleted(0)= false

supongamos que normal fuese 1.
y el usuario decide que no es normal, si no gordo, al momento de guardar pasaria esto:

for i = 0 to list1.listcount
if list1.selected(i)= truen then
..... rutina de guardado o actualizacion del registro
endif
next i

* rs_ado_dao_XX, no se como trabajas tu Base de Datos.
Suerte.
Valora esta respuesta
Me gusta: Está respuesta es útil y esta claraNo me gusta: Está respuesta no esta clara o no es útil
0
Comentar

RE:listbox ayuda por favor

Publicado por David (14 intervenciones) el 08/11/2007 16:12:41
con esto creo que ya lo he pillado Muchas gracias por tu paciencia. Un saludo
Valora esta respuesta
Me gusta: Está respuesta es útil y esta claraNo me gusta: Está respuesta no esta clara o no es útil
0
Comentar

RE:listbox ayuda por favor

Publicado por David (14 intervenciones) el 08/11/2007 17:38:14
ahora ya no entiendo nada, me da un error y no consigo que me funcione.
tengo este codigo

rs.Open "select * from articulos", cn

For i = 0 To List1.ListCount
rs.AddNew
rs.Fields("Nombre") = UCase(Text1)
rs.Fields("codigo") = List1.List(i - 1)
If List1.Selected(i) = True Then
rs.Fields("Pendiente") = "No"
End If
If List1.Selected(i) = False Then
rs.Fields("Pendiente") = "Si"
End If
rs.Update
Next i

rs.Close

la tabla articulo son tres columnas de texto

que puedo hacer o q hago mal?
gracias y un saludo
Valora esta respuesta
Me gusta: Está respuesta es útil y esta claraNo me gusta: Está respuesta no esta clara o no es útil
0
Comentar

RE:listbox ayuda por favor

Publicado por Tun Tun (17 intervenciones) el 08/11/2007 18:02:18
For i = 0 To List1.ListCount -1

???
Valora esta respuesta
Me gusta: Está respuesta es útil y esta claraNo me gusta: Está respuesta no esta clara o no es útil
0
Comentar

RE:listbox ayuda por favor

Publicado por David (14 intervenciones) el 08/11/2007 18:11:04
no te entiendo, explicate please
Valora esta respuesta
Me gusta: Está respuesta es útil y esta claraNo me gusta: Está respuesta no esta clara o no es útil
0
Comentar

RE:listbox ayuda por favor

Publicado por Tun Tun (17 intervenciones) el 08/11/2007 18:16:15
Pues donde inicias el FOR, le restes -1 a listCount

Prueba de esa forma, y si lo graba o actualiza pues bien! XD
Valora esta respuesta
Me gusta: Está respuesta es útil y esta claraNo me gusta: Está respuesta no esta clara o no es útil
0
Comentar