J'ai une question , esse que l'on peut enregistrer les tapes du clavier de l'ordinateur ?
merci
Private Declare Function GetAsyncKeyState Lib "user32" (ByVal vKey As Long) As Integer
For i = 1 To 255
result = 0
result = GetAsyncKeyState(i)
If result = -32767 Then
if (i) = 48 Then
Me.TextBox1.Text = Me.TextBox1.Text + "à"
End If
End If
Next i
JE SUIS PAS RESPONSABLE DE L'USAGE DE CE CODE