Uso del DragOver y Y DragDrop en los TExt

Manuel Acosta Aceves
13 de Abril del 2004
Un saludo al foro, como hago para pasar lo escrito en un text a un label jalandolo y poniendolo donde yo quiera suponiendo que lo escrito de un text puedo poner lo en alguno de los 20 labels

tencho
13 de Abril del 2004
En este codigo coloka un TextBox y un Label

Private Sub Form_Load()
Text1.DragMode = 1
End Sub

Private Sub Label1_DragDrop(Source As Control, X As Single, Y As Single)
If TypeOf Source Is TextBox Then
Label1.Caption = Source.Text
End If
End Sub