A.Private 3ub Form—DragDrop(Source As Control,X As Single,Y As Single) banana.Move Picture1.Left+X,Picture1.Top+Y End Sub B.Private Sub banana_DragDrop(Source As Control,X As Single,Y As Single) Source.Move Picture1.Left+X,Picture 1.Top+Y End Sub C.Private Sub Picturei_DragDrop(Source As Control,X As Single,Y As Single) Source.Move Picture1.Left+X,Picture1.Top+Y End Sub D.Private Sub Picture1_DragDrop(Source As Control,X As Single,Y As Single) banana.Move banana.Left+X,banana.Top +Y End Sub