DragDrop with two Listboxes

In my Program there are two listboxes.
Now I want to select one item of the first listbox and
then move it to the second listbox with the mosue.
While moving the item the mousepointer should be an icon
like one from DRAGDROP.

Is this possible in VB 3.0 ?

Thanks for some advice, Matt ;)