Combate de Atari: Tanque vb 2010 (10 / 18 paso)

Paso 10: El código: tank_vs_tank_keyup

tecla arriba es un controlador que detecta cuando una tecla es para arriba

Haga doble clic en form2 y seleccione la barra de herramientas de declaración en la parte superior del código y seleccione keyup
Agregue el código siguiente después de las dimensiones:

Seleccione caso e.KeyCode
Caso es = Keys.W

Timer9.Enabled = False ' paradas tanque moverse cuando w tecla arriba

Caso es = Keys.S

Timer10.Enabled = False ' tanque se detiene cuando mueva la tecla s para arriba

Caso es = Keys.D

Timer11.Enabled = False ' tanque se detiene cuando mover tecla d arriba

Caso es = Keys.A

Timer12.Enabled = False ' paradas de movimiento cuando una tecla arriba del tanque

Caso es = Keys.ControlKey ' dispara

Si s = 1 Then Timer1.Enabled = True ' detecta si tank1 cara derecha

Si s = 2 entonces Timer2.Enabled = True ' detecta si tank1 cara izquierda

Si s = 3 Then Timer3.Enabled = True ' detecta si tank1 frente

Si s = 4 entonces Timer4.Enabled = True ' detecta si tank1 boca abajo

Final seleccione

' tanque izquierdo

Seleccione caso e.KeyCode

Caso es = Keys.Up

Timer13.Enabled = False ' paradas de movimiento cuando la llave de arriba del tanque

Caso es = Keys.Down

Timer14.Enabled = False ' paradas bajar cuando tecla arriba del tanque

Caso es = Keys.Left

Timer15.Enabled = False ' paradas tanque movimiento cuando clave hasta

Caso es = Keys.Right

Timer16.Enabled = False ' paradas movimiento cuando Llave derecha arriba del tanque

Caso es = Keys.Enter ' dispara

Si k = 1 Then Timer5.Enabled = True ' detecta si tank2 cara derecha

Si k = 2 entonces Timer6.Enabled = True ' detecta si tank2 cara izquierda

Si k = 3 y Timer7.Enabled = True ' detecta si tank2 frente

Si k = 4 entonces Timer8.Enabled = True ' detecta si tank1 boca abajo

Final seleccione