vb 标签拖动赋值问题

Question

form1上有label1,label2，label3和label4当鼠标拖动label2到label1上的时候，label1显示label2的内容，
当鼠标拖动label3到label1上的时候，label1显示label3的内容，
当鼠标拖动label4到label1上的时候，label1显示label4的内容，求助高手！ 

Answer 1

不是很明白楼主的目的。
label2离label1时，没要求？

Answer 2

Label1
Label2
Label3Label2.dragmode = 1
Label3.dragmpde = 1Private Sub Label1_DragOver(Source As Control, X As Single, Y As Single, State As Integer)
    Label1.Caption = Source.Caption
End Sub