Code conditionnel

bonjour mon probleme est le suivant :

Code:

---

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

Cai,

Il ne s'agit pas de lire ou non une ligne de code, mais d'écrire un code qui gère la situation.

En clair, prévoir que ton personnage peut atteindre le bord de l'image, et décider ce qu'il faut faire quand cela arrive. :)

ma solution etait de desactiver ses deux dernier eligne car je pouvait le faire sous irc en scripting et je me demandait si il y avait une equivalence en vb6

mais je croi y avoir trouver uen autre solution merci de mavoir forcer a en trouver une haha =)

Code:

---

Picture1.Item

---

Tu programmes en VB6 avec ce code ? 8O

Citation:

---

mais je croi y avoir trouver uen autre solution merci de mavoir forcer a en trouver une

---

Tu peux nous la donner cette solution ?

je vous la donne aussitot que jai fini de la faire
jai l'idée me reste a la metre en pratique et je programe en vb6 avec se code picture1.item(1) c'est quand tu faire copier coller avec un control il reste avec le meme nom mais un autre item jai en fait 224 item de picture1 (un carré de 15 par 15)

Citation:

---

Envoyé par ProgElecT

Code:

---

Picture1.Item

---

Tu programmes en VB6 avec ce code ? 8OTu peux nous la donner cette solution ?

---

Bonjour, Progelect,

Mais si, mais si, c'est possible (un peu beaucoup "très beaucoup" bizarre, mais possible) ...:lol:
Il suffirait qu'il ait deux forms (l'une nommée Form1 et l'autre .... Picture1...:lol:... et qu'il ait placé sur sa form nommée Picture1 un groupe de contrôles indexés Nommés Item(0), Item(1), ... etc...8O

Et qu'il envoie des instructions, depuis Form1, de modification de ses contrôles Item(x) placés sur la Form Picture1...

Il faut le faire !!!! :lol:

EDIT : quoi qu'il en soit ...;) (et en admettantt que son appli tient la route) ===>> une variable booléenne et une expression conditionnelle

Citation:

---

Envoyé par ucfoutu

B....
Il suffirait qu'il ait deux forms (l'une nommée Form1 et l'autre .... Picture1...:lol:... et qu'il ait placé sur sa form nommée Picture1 un groupe de contrôles indexés Nommés Item(0), Item(1), ... etc...8O
...

---

:mouarf: toujours à chercher midi à 14h ;)

Citation:

---

Envoyé par Aide en ligne VB

Item est la propriété par défaut d'une collection ; les lignes de code suivantes sont donc équivalentes :

Print MyCollection(1)
Print MyCollection.Item(1)

---

Tiens ... C'est vrai ! Il a peut-être une collection Picture1 ...

Quel que soit le cas : variable booléenne et expression conditionnelle.

ma solution est de limiter les rebord avec des if mais c'est long et lourd comme code

il y a tu moyen de faire un if a plusieur condition sans elseif
ex:

Code:

---

if pos = 0 OU 15 OU 30 OU 45 ect... then

---

jai essayer avec Or mais sa ne fonctionne pâs

Citation:

---

Envoyé par ucfoutu

Bonjour, Progelect,

Mais si, mais si, c'est possible (un peu beaucoup "très beaucoup" bizarre, mais possible) ...:lol:
Il suffirait qu'il ait deux forms (l'une nommée Form1 et l'autre .... Picture1...:lol:... et qu'il ait placé sur sa form nommée Picture1 un groupe de contrôles indexés Nommés Item(0), Item(1), ... etc...8O

Et qu'il envoie des instructions, depuis Form1, de modification de ses contrôles Item(x) placés sur la Form Picture1...

Il faut le faire !!!! :lol:

---

Tordu ce code

Citation:

---

Envoyé par ucfoutu

Il faut le faire !!!! :lol:

---

j'ai bien compris le sens que tu donnes a cette expression.

Mais pour l’autre sens, ce Forum étant aussi pour les débutants en programmation, il faut que quelqu’un le dise.
NON et NON, très très mauvaise habitude de coder de cette façon, il y a un minimum de règles acceptées par l'ensemble des programmeurs (et quelque soit le langage de programmation utilisé), j'imagine les difficultés de maintenance par une tierce personne tombant sur un code pareil.
Pour ceux qui commence a faire leurs premiers pas dans la programmation, NE SUIVEZ PAS cette façon de faire.

Avec Select Case ....

Exemple :

Code:

---

1 2 3 4 5 6 7 8

Select case toto case 0,30,15,45 'instructions case 8,1 "instructions case else 'instructions end select

---

Maintenant : si les valeurs de ton exemples ne sont pas au hasard : tu devrais t'intéresser à l'opérateur Mod (car ces valeurs sont des multiples de 15) :lol:

en effet mes valeur sont des multiple de 15 pour ce code

ton toto signifi quoi??

finalement le select case a resolu mon probleme merci bcq =)