en VBA créer un compteur qui ne sert à rien

[loic38]

bonjour à tous

voila mon pb
je voudrais créer créer cinq compteurs qui ne servent à rien

le premier c'est celui du nombre de fois où l'on sert de la flèche droite
le second celui de la flèche vers le haut
le troisième celui de la flèche vers la gauche
le quatrième celui de la flèche vers le bas

enfin le dernier le plus difficile, celui qui recense le nombre de fois où l'on enchaine à la suite les uns des autres droite, haut, gauche, bas (dans ce sens là uniquement)


qui peut m'aider dans la quête de l'inutile ?

 

[jmps]

Bonjour loic38,

Voici une première approche pour tes quatre premiers compteurs :

Private Sub UserForm_KeyUp(ByVal KeyCode As MSForms.ReturnInteger, ByVal Shift As Integer)
  Select Case KeyCode.Value
    Case 37
    Label1.Caption = Val(Label1.Caption) + 1
    Case 38
    Label2.Caption = Val(Label2.Caption) + 1
    Case 39
    Label3.Caption = Val(Label3.Caption) + 1
    Case 40
    Label4.Caption = Val(Label4.Caption) + 1
  End Select
End Sub

Tu dois créer un Userform dans lequel tu places 4 labels avec 0 (zéro) en caption.

Vraiment vite fait avant de partir, on doit pouvoir faire plus efficace. J'essaie de voir pour le compteur le plus inutile de l'inutilissime ce soir chez moi si je peux. Autrement d'autres amateurs d'inutile viendront bien à ton secours.

A+

José

PS : On dirait une méthode de triche pour console de jeux. Lol !

 

[Hervé]

Bonsoir

Une solution par onkey sans userform.

J'ai pas cherché pour l'enchainement des touches.

salut
Hervé

 

[loic38]

bonsoir
merci de vous intéresser à la chose inutile
je voudrais relancer un post Fun qui date de vieux (04/2004)
en créant un jeu totalement débile
je vous dirai plus par la suite

 

[Hervé]

Bonjour

Je crois que je me suis planté dans l'envoi de mon fichier, voici le bon.

(faut vraiment que je range mon disque dur)

Salut
Hervé

 

[jmps]

Bonjour Loic, Hervé, le Forum,

Merci Hervé, je ne connaissais pas Onkey. C'est assez intéressant et je pense qu'on doit pouvoir faire des choses assez drôles avec.
Je me suis donc permis de me baser sur ta macro pour faire un petit quelque chose adapté à la demande de notre ami Loic. J'y ai ajouté le compteur de la séquence de touches.

J'espère que Loic va nous faire un super jeu inutile et débile. J'adore ça. ;°)

A toi Loic. J'espère que maintenant tu as les bases.

Bonne journée à tous.

José

 

[Hervé]

re

Jmps ton appli est vraiment inutile, compliment (lol).

Salut
Hervé

 

[jmps]

Re Hervé,

Merci. Très flatté. Et puis le client est roi après tout. ;°)

A+

José