单项选择题

在窗体E先后画2个图片框,名称分别为Picture1和banana,banana中添加了香蕉图片,如图1所示,且将banana.DragMode属性设置为1。要求程序运行时,可以用鼠标把banana拖拽到Picture1中,如图2所示。能实现此功能的事件过程是( )。

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