Mover item de un list a otro list

[fedefrankk]

Hola , necesito mover items de un list1 al list2,,, moverlo de un izquierda a derecha y viceversa .. hice un programita pero me mueve todos los objetos

Código PHP:

  Private Sub Command1_Click()
Dim a As Integer
n = 1
For a = 0 To List1.ListCount - 1
List2.AddItem List1.List(a)
Next a
End Sub  
   

aclaro en el boton 1, tengo un "List1.AddItem Val(Text1)"

gracias saludos a todos

[wrvasquez]

Estimado fedefrankk

Lo que sucede es que estas haciendo un bucle repetitivo y recorres todos los elementos del List1 y en cada entrada estas cargando los elementos al List2, te sugiero que utilices el evento SelectedIndex, asi:

En el evento click de boton pones:
List2.AddItem = List1.SelectedIndex;

Previemente podrias validar si ya existe si necesitas ayuda mas especifica me dices para pasarte un ejemplito.

Saludos
Wagner Vásquez

[David]

Usar el SelectedIndex es válido en caso de que el ListBox solo permita seleccionar un único elemento, en caso de que permita seleccionar varios podrías hacer ese bucle pero comprobar si el elemento está seleccionado (Selected) antes de pasar a la otra lista.

[fedefrankk]

Hola, gracias por las sugerencias, cuendo uso List2.AddItem = List1.SelectedIndex --- me sale un error que dice que no se encontro el metodo o el objeto.. no se bien como ubicarlo..
si alguien tiene un ejemoplito seria mucho mejor...

saludos y muchas gracias

[Avellaneda]

Iniciado por fedefrankk

Hola, gracias por las sugerencias, cuendo uso List2.AddItem = List1.SelectedIndex --- me sale un error que dice que no se encontro el metodo o el objeto.. no se bien como ubicarlo..
si alguien tiene un ejemoplito seria mucho mejor...

saludos y muchas gracias

Hola,

SelectedIndex no es ninguna propiedad del control ListBox.

List2.AddItem List1.Text

Nota: sin el signo igual (=)

[David]

Avellaneda tiene razón, es ListIndex .

[fedefrankk]

Hola, gracias..!!! ahora voy a probar con lo que me ha dado ustedes y si me sale todo bien posteo el programita.. mychas gracias como siempre..!!!
Saludos a todos