bonjour mon probleme est le suivant :

Code : Sélectionner tout - Visualiser dans une fenêtre à part
1
2
3
4
5
6
7
8
9
Private Sub Form_KeyPress(KeyAscii As Integer)
  Text1.SelText = KeyAscii
  If KeyAscii = 101 Then
    ppos = pos
    pos = pos - 1
    lookmove
    Picture1.Item(pos) = Picture1.Item(225).Picture
    Picture1.Item(ppos) = Picture1.Item(226).Picture
  End If
jaimerai sa voir comment faire pour ne pas que mon programe lit les 2 derniere ligne de code quand je ne veut pas qu'il les lise car sa sert a deplacer mon personnage et quand il atteind le bord sa me fait une erreur