bahharkarim
Messages postés3Date d'inscriptionvendredi 16 avril 2010StatutMembreDernière intervention10 juillet 2010
-
21 juin 2010 à 21:02
bahharkarim
Messages postés3Date d'inscriptionvendredi 16 avril 2010StatutMembreDernière intervention10 juillet 2010
-
23 juin 2010 à 15:53
bonjour
j'utilise 4 label 1;2;4;5 dans vb 2008
et je le drag and drop de label1 vers label3 et label2 vers label5 mais il ne fonctionne pas comme je veux j'ai le code suivant:
Public Class Form2
Private Sub Form2_Load(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles MyBase.Load
Label4.AllowDrop = True
Label5.AllowDrop = True
End Sub
Private Sub Label4_DragDrop(ByVal sender As Object, ByVal e As System.Windows.Forms.DragEventArgs) Handles Label4.DragDrop
Label4.Text = e.Data.GetData(DataFormats.Text).ToString
End Sub
Private Sub Label4_DragEnter(ByVal sender As Object, ByVal e As System.Windows.Forms.DragEventArgs) Handles Label4.DragEnter
If (e.Data.GetDataPresent(DataFormats.Text)) Then
e.Effect = DragDropEffects.Copy
Else
e.Effect = DragDropEffects.None
End If
End Sub
Private Sub Label1_MouseDown(ByVal sender As Object, ByVal e As System.Windows.Forms.MouseEventArgs) Handles Label1.MouseDown
Label1.DoDragDrop(Label1.Text, DragDropEffects.Copy)
End Sub
Private Sub Label5_DragDrop(ByVal sender As Object, ByVal e As System.Windows.Forms.DragEventArgs) Handles Label5.DragDrop
Label5.Text = e.Data.GetData(DataFormats.Text).ToString
End Sub
Private Sub Label5_DragEnter(ByVal sender As Object, ByVal e As System.Windows.Forms.DragEventArgs) Handles Label5.DragEnter
If (e.Data.GetDataPresent(DataFormats.Text)) Then
e.Effect = DragDropEffects.Copy
Else
e.Effect = DragDropEffects.None
End If
End Sub
Private Sub Label2_MouseDown(ByVal sender As Object, ByVal e As System.Windows.Forms.MouseEventArgs) Handles Label2.MouseDown
Label2.DoDragDrop(Label2.Text, DragDropEffects.Copy)
End Sub
End Class
NSUADI
Messages postés540Date d'inscriptionmardi 4 août 2009StatutMembreDernière intervention 1 février 20132 22 juin 2010 à 00:51
ICONIC FIGURE
comment ça ne fonctionne pas comme tu veux?
parce que ton code te permet de copier la valeur de la propriété texte du label1 sur le label4.ainsi lors de l'exécution,le texte de label4 devient label1...
c'est quoi que tu veux faire??
bahharkarim
Messages postés3Date d'inscriptionvendredi 16 avril 2010StatutMembreDernière intervention10 juillet 2010 23 juin 2010 à 15:53
merci de votre réponse mais: le problème c'est que lors de l'exécution il copie le texte de label 1 vers label4 en plus si je enfonce la souris sur label1 et glisse vers label5 il copie le texte de label1 vers label5 ce que je ne veux pas c-a-d il faut une condition pour que le copie de label1 vers label4 et le copie de label2 vers label5