Autoriser le CRTL+V dans textbox

Bonjour,

Voici le keypress de ma textbox qui n'accepte que du texte

Code:

---

1 2 3 4 5 6 7 8 9 10

''' <summary> ''' ACCEPTE:(LETTRE,"-",L'ESPACE,LA TOUCHE BACK) ''' </summary> ''' <param name="sender"></param> ''' <param name="e"></param> ''' <remarks></remarks> Private Sub TEXTBOX_PAS_NUM_KeyPress(ByVal sender As Object, ByVal e As System.Windows.Forms.KeyPressEventArgs) Handles TXT_NOM.KeyPress, TXT_PRENOM.KeyPress, TXT_ADRESS.KeyPress If Char.IsLetter(e.KeyChar) = False And Asc(e.KeyChar) <> System.Windows.Forms.Keys.Back And Asc(e.KeyChar) <> System.Windows.Forms.Keys.ControlKey And Asc(e.KeyChar) <> System.Windows.Forms.Keys.Space And Not e.KeyChar.ToString = "-" And Not e.KeyChar.ToString = "'" Then e.Handled = True End Sub

---

Le problème c'est que je n'arrive pas a faire de ctrl+v pour coller dans la textbox, j'ai essayé avec System.Windows.Forms.Keys.control mais sans succès.

Auriez vous une idée ?

Bonjour
il y a e.Modifiers, mais fonctionne avec les événements KeyDown et KeyUp :

Code:

---

1 2 3 4 5 6

Private Sub TextBox1_KeyDown(ByVal sender As Object, ByVal e As System.Windows.Forms.KeyEventArgs) Handles TextBox1.KeyDown   If e.Modifiers = Keys.Control AndAlso e.KeyCode = Keys.V Then 'TextBox1.Text = Clipboard.GetData(DataFormats.Text).ToString End If End Sub

---

pour plus de lisibilité on fait :

Code:

---

1 2 3 4

If Char.IsLetter(e.KeyChar) Then Exit Sub If Asc(e.KeyChar) = System.Windows.Forms.Keys.Back Then Exit Sub 'autres cas ... e.handled = true

---

et là même plus besoin de commentaire on comprend en lisant

Merci