Problema con listbox

loconfundido
02 de Noviembre del 2005
Hola todos.
Necesito hacer lo siguiente y no he podido:
Tengo dos listbox con datos numericos y necesito que en un tercer listbox me coloque lo numeros menores de los dos primeros listbox....es decir, si en el primer listbox tengo los datos 4,7,9 y en el segundo listbox tengo los datos 2,8,5, en el tercer listbox me deberia salir 2,7,5
por favor ayudaaaaa
Muchas Gracias

mvallejos
02 de Noviembre del 2005
Para empezar, a los primeros 2 listbox, colocales la propiedad Sorted en True, luego, los recorres paralelamente

Por ejemplo
' Limpiar el List destino
List3.Clear

For i = 0 to List1.ListCount -1
' De los dos valores, hay que seleccionar el menor
If Val(List1.List(i)) <= Val(List2.List(i)) Then
List3.AddITem List1.LIst(i)
Else
List3.AddITem List2.LIst(i)
End if
Next i

El problema es que si List1 y List2 tienen distintas cantidades de elementos, directamente ponle el Sorted = True al List3 y le pasas los datos así como están, el List3 los acomodará solo.

Saludos