Utiliser les touches directionnelles en .net Résolu

Question

Bonjour, 

Je suis sur une réalisation en vb.

C'est un bonhomme que l'on peut faire bouger avec les touches directionnelles.
Il y a des monstres invisibles qui au fur et à mesure apparaissent et attaquent le bonhomme en lui tirant dessus. Le problème, c'est que je n'arrive pas à le faire bouger : 
Select Case e.KeyCode
            Case Keys.Down
                Me.PictureBox1.Location = Location.Y -1
            Case Keys.Up

Case Keys.Left

Case Keys.Right

Je sais que le Location.Y -1 ça n'existe pas, mais je ne sais pas comment faire...

Merci d'avance,

Alvin1614

yg_be · Answer

bonsoir, peut-être:
Me.PictureBox1.Location = New Point(Me.PictureBox1.Location.X , Me.PictureBox1.Location.Y -1)

cs_Le Pivert · Answer

Bonjour,

Comme ceci:

Option Strict On
Public Class Form1
    Private Sub Form1_KeyDown(ByVal sender As System.Object, ByVal e As System.Windows.Forms.KeyEventArgs) Handles MyBase.KeyDown
        Select Case e.KeyCode
            Case Keys.Down
                If Me.PictureBox1.Location.Y = Me.Height - PictureBox1.Height Then Exit Sub
                Me.PictureBox1.Location = New System.Drawing.Point(Me.PictureBox1.Location.X, Me.PictureBox1.Location.Y + 1)
            Case Keys.Up
                If Me.PictureBox1.Location.Y = 0 Then Exit Sub
                Me.PictureBox1.Location = New System.Drawing.Point(Me.PictureBox1.Location.X, Me.PictureBox1.Location.Y - 1)
            Case Keys.Left
                If Me.PictureBox1.Location.X = 0 Then Exit Sub
                Me.PictureBox1.Location = New System.Drawing.Point(Me.PictureBox1.Location.X - 1, Me.PictureBox1.Location.Y)
            Case Keys.Right
                If Me.PictureBox1.Location.X = Me.Width - PictureBox1.Width Then Exit Sub
                Me.PictureBox1.Location = New System.Drawing.Point(Me.PictureBox1.Location.X + 1, Me.PictureBox1.Location.Y)
        End Select
    End Sub
End Class 

Voilà

Utiliser les touches directionnelles en .net

2 réponses

Votre réponse

Discussions similaires