Almacenar items de listbox.

carlos79 · #1 (**permalink**) 06/01/2010, 10:09

FELIZ AÑO a todos los foristas de este site !!!!

En esta oportunidad les escribo porque tengo una pequeña duda....

Tengo un listbox operando bajo la modalidad checked. El sistema lo estoy desarrollando en visual basic 6 SP6 y base de datos MYSQL a un servidor.

Que necesito ?? bueno... cuando tilde las opciones desplegadas en el listbox y le haga click a mi command buttom, se almacene en la base de datos las alternativas seleccionadas con el código de cada una de ellas.

Quizá sea algo sencillo pero mis conocimientos son muy básicos en VB6.

Saludos.

Carlos !

David · #2 (**permalink**) 06/01/2010, 10:14

Depende de la estructura de la tabla.

Para saber qué elementos están marcados, sólo tienes que usar un bucle para verificar la propiedad Selected:

Código vb:

Ver originalDim I As Integer
For I = 0 To List1.ListCount - 1
    If List1.Selected(I) Then
        MsgBox List1.List(I)
    End If
Next I

carlos79 · #3 (**permalink**) 06/01/2010, 10:22

ok te explico :

Yo hago una consulta en mi tabla y me despliega en el listbox multiples opciones.. que sucede... cuando marco una de ellas automáticamente me muestra su código en un textbox... pero imaginte que marques 20 opciones y vayas guardando

... jejeje...

Ahora bien, quisiera saber como puedo marcar 10 opciones y solamente darle click a un command buttom me grabe en la base de datos el código de los items seleccionados...

por ejemplo... listbox con dias de la semana... cada dia tiene un código, por ejemplo, lunes codigo 01, martes código 02....

si tildo lunes miercoles y viernes al hacer click en el boton de guardar se almacene en la base de datos 01, 03 y 05....

espero haberme explicado !!!

saludos y nuevamente un millon de gracias !!!

David · #4 (**permalink**) 06/01/2010, 10:28

Como te indiqué en el mensaje anterior, con un bucle puedes obtener todos los elementos marcados de la lista. A partir de ahí, sólo tienes que cambiar el código para que en lugar de mostrar el texto del elemento (con ese MsgBox) ejecute la consulta a la base de datos para guardar el valor.

carlos79 · #5 (**permalink**) 06/01/2010, 10:32

Perfecto David.. acabo de correr el código y es lo que necesitaba !!!! muchísimas gracias por la solución y la rapidez de tu respuesta !!!