Mensajes

Se debe a que te dedicas a copiar código,  te pasa lo mismo que en este post.

http://foro.elhacker.net/programacion_visual_basic/asignar_acciones_en_los_items_de_un_listbox-t452598.0.html

Por favor, pon el nombre que le des a tu listbox y no el que te den en el código de ejemplo!!!!...

Saludos.

Si bien estoy aprendiendo, se que los nombres de los controles son fundamentales para que funcione el codigo, en mi proyecto le asigne el nombre de listbox1 si quieres prueba el codigo y verifica por tu cuenta el error.

Eso es solo el nombre del control... De hecho podría haber sido al revés o podrías haberle puesto otro diferente.

Algún día te darás cuenta de la tontería

En la primera respuesta las acciones van dirigidas al list1 en cambio en la segunda las acciones se dan combinando el list1 con el list2, es mas que el nombre del control.

La respuesta se te dio en la primera respuesta.

Por favor coge un libro porque el resto del tema a sido absurdo...

Lo siento por no tener tu inteligencia supina, pero para mi son respuestas diferentes aunque sea un solo numero el que hace la diferencia, se supone que el foro es para preguntar y aprender. Un poco de humildad 

Private Sub List1_Click()
    MsgBox List1.List(List1.ListIndex)
End Sub

Private Sub List2_Click()
    MsgBox List1.List(List2.ListIndex)
End Sub

Si mal no recuerdo es algo como esto,

Código (vb) [Seleccionar] Expandir

ListBox1.List(0, 0) = "Valor 1"
ListBox1.List(0, 1) = "Valor 2"

Gracias por responder amigo, pero me da el siguiente error:



¿A que se deberá?

Estimados, me fijé que al control listbox da la opción de trabajar en columnas, pero no encuentro la forma de asignar datos en una columna en particular.

Como tendría que hacerlo por ejemplo para poder agregar una string en la columna 2 del listbox.

PD: Se que podría hacerlo con un listview o datagrdi, pero necesito hacerlo desde un listbox.

Muchas gracias

Creo que esto es lo que quieres:

Código (vb) [Seleccionar] Expandir

Private Sub List2_Click()
    MsgBox List1.List(List2.ListIndex)
End Sub

Puedes substituir el List2.ListIndex por la posición fija si es lo que quieres.

Funcionó perfecto amigo, jamas pensé que lo podría lograr con un código tan pequeño, muy agradecido

¿En qué quedamos?

Estimado te explico, lo que pasa es que quiero lograr lo siguiente:

tengo 2 listbox
- En el primero se muestra una lista con las rutas de unos archivos
- En el segundo muestra el contenido de los archivos mostrados en el primero listbox

Lo que quiero lograr es que al hacer click en una fila de listbox2 me muestre un msgbox con la ruta del archivo en la fila 1.

dejo una imagen del proyecto:



en la imagen muestra la ruta pero al hacer click en el list1, y yo necesito que me muestre la ruta pero desde el list2.

Entonces yo pensaba que sabiendo como asociar un item con otro podría lograrlo.

Obviamente sí se puede...

Código (vb) [Seleccionar] Expandir

Private Sub List1_Click()
    MsgBox List1.List(List1.ListIndex)
End Sub

saludos.

gracias estimado, pero ¿se podrá hacer sin necesidad de tener que seleccionar el item de la lista?

Estimados, mi pregunta es la siguiente, tengo un listbox con 5 items y quiero que por ejemplo al hacer click en el item 1 me muestre un msgbox con el contenido del item número 1 y así con todos.

Se puede hacer esto en vb6? Gracias amigos 

Estimados, tengo un script que realiza algunas acciones con el mouse y el teclado, pero necesito optimizarlo par que se ejecuten los comandos con un menor tiempo de respuesta, es decir que haga lo que hace pero en menos tiempos.

Este es parte del código:

Código (actionscript) [Seleccionar] Expandir

Loop 478 {
MouseClick, left,  147,  628
MouseClick, left,  880,  528
Send, a


Gracias amigos