DRAGandDROP qui se suivent dans une TextBox

Bonjour :D
j'utilise ce code :

Code:

---

1 2 3 4 5 6

Private Sub TextBox1_DragEnter(ByVal sender As System.Object, ByVal e As System.Windows.Forms.DragEventArgs) Handles TextBox1.DragEnter If e.Data.GetDataPresent(DataFormats.Text) = True Then e.Effect = DragDropEffects.All End If   End Sub

---

pour entrer des données dans une TextBox.
Mais le DRAGandDROP efface les données déjà présentes dans le TextBox.
Comment faire pour qu'il s'ajoute à la suite des données déjà présentes ?
merci d'avance

Le code que tu montres c'est ce qu'il se passe lorsque le curseur entre sur la texbox en mode drag and drop.
L'action se fait dans l'événement DragDrop du contrôle, dans lequel tu pourras décider d'ajouter les éléments au contrôle
https://learn.microsoft.com/en-us/do...owsdesktop-8.0

merci umfred pour ta reponse :)
Je regarde ça demain.

Bon sang ! ... mais qu'est ce que je suis c.. (étourdi :lol:)
plus loin dans mon code j'avais mis

Code:

---

1 2 3 4 5

Private Sub TextBox1_DragDrop(ByVal sender As System.Object, ByVal e As System.Windows.Forms.DragEventArgs) Handles TextBox1.DragDrop If e.Data.GetDataPresent(DataFormats.Text) = True Then TextBox1.Text = e.Data.GetData(DataFormats.Text) End If End Sub

---

alors qu'il faut mettre :

Code:

---

TextBox1.Text = TextBox1.Text + e.Data.GetData(DataFormats.Text)

---

Je suis vraiment désolé pour le dérangement :aie: