Click & Drag from one list box to another list box in Access 2007 VBA

Now I am trying to make selection of Customers easier for my user. My user's business involves making deliveries on routes. Every customer is assigned a route number, which references the route in the route table.

In my form I want to have two list boxes, side by side. lb1 showing customers already assigned to the route, and the other. YES, all other customer NOT assigned to this route - lb2 ... clever huh ? :-).

Besides the usual buttons ( " < " & " << ", " > " & " >> " )< I would like to be able to click on a name in one list box and drag them to the other list box to assign/unassign them to a route.

Click, drag and drop from lb1 to lb2. OR click, drag and drop from lb2 to lb1, with the respective list boxes being updated....

I have done this in PowerBuilder back at the turn of the millenium..... <lol> as well as more recently in Delphi 2010. I am trying to get used to Access, VB & VBA..... Gads.... did I just say that ?

Names would appear in the other list box, & disappear from the original list box.

You would be better to put it under a double click event on the list box. ie the user double clicks the name to move it to the other box. it is simple to implement and is faster and easier for the user to use than drag and drop.

If you're in one of those predicaments where cls.__private attributes just aren't enough since they can easily be accessed through inst._cls__private, and you need something a little more secure, here's ...