Visual Basic - DRAG AND DROP NO ME FUNCIONA AUXILIO!!

HOLA TENGO UNA APLICACION EN LA Q DEBO MOVER UN CONTROL YA SEA IMAGE O PICTURE BOX O TEXTBOX NO SE CUAlquiera Q SE ENCUENTRA DENTRO DE UN PICTURE BOX, HE PROBADO TODOS LOS Q APARECEN ACA Y NO LO ARRASTRA, SI ME PUEDEN AYUDAR SE LOS AGRADECERIA.-..

yo tengo una sub que me arrastra de un listbox a un textbox

tal vez te pueda ayudar para guiarte

recuerda poner en las propiedas del picture, textbox etc, la opcion de drag= auto o manual

Private Sub TxBox1_OLEDragDrop(Data As DataObject, Effect As Long, Button As Integer, Shift As _
Integer, X As Single, y As Single)
'Copiamos el item del FLBox1 en el TxBox1 al hacer el Drag
BDDRuta = "" & DirRuta & "" & ArchivoDrag & ""
TxBox1.Text = ArchivoDrag
Otra1.Text = BDDRuta
End Sub

espero sea de ayuda.