Étape 10 : Le code : tank_vs_tank_keyup
Key relachΘe est un gestionnaire qui détecte quand une clé est laissée en place
double-cliquez sur form2 et sélectionnez la barre d’outils de déclaration au sommet du code et sélectionnez keyup
Ajoutez le code suivant après les dimensions :
Sélectionnez la Case e.KeyCode
Affaire est = Keys.W
Timer9.Enabled = False ' arrêts réservoir déplacer quand w key relachΘe
Affaire est = Keys.S
Timer10.Enabled = False ' arrêts réservoir déplacer quand touche s vers le haut
Affaire est = Keys.D
Timer11.Enabled = False ' arrêts réservoir déplacer quand d key relachΘe
Affaire est = Keys.A
Timer12.Enabled = False ' arrêts réservoir déplacer lorsqu’une clé vers le haut
Affaire est = Keys.ControlKey ' pousses
Si s = 1 Then Timer1.Enabled = True ' détecte si tank1 face droite
Si s = 2 Then Timer2.Enabled = True ' détecte si tank1 visage laissé
Si s = 3 Then Timer3.Enabled = True ' détecte si tank1 face
Si s = 4 Then Timer4.Enabled = True ' détecte si tank1 face vers le bas
End Select
« réservoir gauche
Sélectionnez la Case e.KeyCode
Affaire est = Keys.Up
Timer13.Enabled = False ' arrêts réservoir déplacer lorsque la touche vers le haut
Affaire est = Keys.Down
Timer14.Enabled = False ' arrêts réservoir descendre quand key relachΘe
Affaire est = Keys.Left
Timer15.Enabled = False ' arrêts réservoir déménagement lorsque laissé clés vers le haut
Affaire est = Keys.Right
Timer16.Enabled = False ' arrêts réservoir déplacer lorsque la touche de droite vers le haut
Affaire est = Keys.Enter ' pousses
Si k = 1 Then Timer5.Enabled = True ' détecte si tank2 face droite
Si k = 2 Then Timer6.Enabled = True ' détecte si tank2 visage laissé
Si k = 3 Then Timer7.Enabled = True ' détecte si tank2 face
Si k = 4 Then Timer8.Enabled = True ' détecte si tank1 face vers le bas
End Select