Problème de détection des flèches

Bonjour. J'ai une application qui fonctionne bien sous XP mais pas bien sous Windows 7. Le problème est que je dois détecter les flèches du clavier (Up,down,left,right).
Mais sous windows7, je dois maintenir shift avec la flèche pour la détecter. Est-ce que quelqu'un pourrait bien me dire ce que je dois faire pour éviter d'appuyer sur shift?

Merci de votre aide.

Bonjour,

peux tu nous montrer ton code stp ?

Code:

---

1 2 3 4 5

Private Sub OLE_KeyDown(Index As Integer, KeyCode As Integer, Shift As Integer) If KeyCode = vbKeyLeft Then Call gauche_click If KeyCode = vbKeyRight Then Call droite_click If KeyCode = vbKeyUp Then Call haut_click If KeyCode = vbKeyDown Then Call bas_click

---

J'ai un frame et un ole dans ma form. J'ai mis le focus sur mon ole mais rien à faire