Visual Basic - ayuda con lisbox

como hago para pasar de un listbox lo que ya esta selecionado a otro listbox

Debes de hacer un ciclo para saber cual esta seleccionado y luego pasarlo al otro listbox, puede ser que lo ejecutes con un boton al hacer clic sobre el listbox1
Private Sub Command1_Click()
For I = 0 To Me.List1.ListCount - 1
If List1.Selected(I) = True Then
List2.AddItem List1.List(I)
End If
Next I
End Sub
Private Sub List1_Click()
Command1_Click
End Sub