Mover items seleccionados de ListBox e insertarlos en otro ListBox

[Fran1946]

Hola a todos:

A ver si alguien me puede echar una mano, que me estoy volviendo loco.
Tengo 2 ListBox List A y List B, que se ven en la imagen.
Los dos tienen los mismos items, List B es una copia de List A.

Y lo que quiero es, según se ve en la imagen, mover los items de List B, e insertarlos en List A debajo del item de List A que tiene seleccionado, y claro esta que esos mismos items de List B, se borren en List A.
Utilizo 2 ListBox por que List A es MultiSelect = 0, y List B Multiselect = 2.

La operación realmente sería mover de sitio los seleccionados en List B, en List A.

Un saludo.  

[scavdr]

mira este artículo:

http://www.canalvisualbasic.net/foro/visual-basic-6-0/mover-items-entre-listbox-5775/

[Fran1946]

Gracias scavdr, pero ya lo he solucionado.

Un saludo.