pb de KeyPress

Question

Je voudrai détecter la touche entrée dans RichTextBox2 pour lancer toto()

Le programme ci-dessous ne fonctionne pas, je ne connais pas bien Vb.net.
Je ne c’est pas ci il faut faire :
Private Sub RichTextBox2_KeyPress


        Private Sub RichTextBox2_KeyPress(ByVal KeyAscii As Integer)
            With RichTextBox2
                Select Case KeyAscii
                    Case 13
                        toto()
                End Select
            End With
        End Sub


Merci pour tout l’aide

cs_EBArtSoft · Answer

Utilise KeyDown pour Chr(13)

@+

E.B.

cs_JCpp · Answer

j'ai remplacé
RichTextBox2_KeyPress
par
RichTextBox2_KeyDown
c'est tjs pareil rien

On ne clique pas sur une case comme sur RichTextBox2 pour faire apparaitre un Private Sub ?

cs_EBArtSoft · Answer

Voici la definition :

Private Sub RichTextBox1_KeyDown(KeyCode As Integer, Shift As Integer)
    Select Case KeyCode
    Case vbKeyReturn: MsgBox "Vous avez appuyé sur {Entrée}"
    Case Else 'NOP
    End Select
End Sub

@+

E.B.

Pb de KeyPress

3 réponses

Discussions similaires