GetAsyncKeyState --- ?SetAsyncKeySate?

GetAsyncKeyState permet de savoir si une des touches du clavier est enfoncée ou pas.

J'aimerais pouvoir définir l'état d'une touche. Comment faire ?

Bonjour

test ca .
Private Declare Function GetKeyState _
Lib "user32" (ByVal nVirtKey As Long) As Integer

Private Sub Command1_Click()

If GetKeyState(VK_1) >= 0 Then
MsgBox "Bouton 1 relaché"
Else
MsgBox "Bouton 1 enfoncé"
End If
End Sub

tu cree un projet avec un bouton
dis moi si c'est ok pour toi
nariel1


-------------------------------
Réponse au message :
-------------------------------

GetAsyncKeyState permet de savoir si une des touches du clavier est enfoncée ou pas.

J'aimerais pouvoir définir l'état d'une touche. Comment faire ?

Merci beaucoups mais j'ai trouvé :D c'était keybd_event, pour savoir comment l'utiliser il faut voir ma source dans la catégorie "Souris, clavier, ..."