Discussion :

[Micklabrute]

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

[droggo]

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.

[Micklabrute]

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 =)

[ProgElecT]

Code :

Sélectionner tout - Visualiser dans une fenêtre à part

Picture1.Item

Tu programmes en VB6 avec ce code ?

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

Tu peux nous la donner cette solution ?

[Micklabrute]

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)

[ucfoutu]

Code :

Sélectionner tout - Visualiser dans une fenêtre à part

Picture1.Item

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

Bonjour, Progelect,

Mais si, mais si, c'est possible (un peu beaucoup "très beaucoup" bizarre, mais possible) ...
Il suffirait qu'il ait deux forms (l'une nommée Form1 et l'autre .... Picture1...... 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...

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 !!!!

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

[SfJ5Rpw8]

B....
Il suffirait qu'il ait deux forms (l'une nommée Form1 et l'autre .... Picture1...... 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...
...

toujours à chercher midi à 14h

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)

[ucfoutu]

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

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

[Micklabrute]

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 :

Sélectionner tout - Visualiser dans une fenêtre à part

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

jai essayer avec Or mais sa ne fonctionne pâs

[ProgElecT]

Bonjour, Progelect,

Mais si, mais si, c'est possible (un peu beaucoup "très beaucoup" bizarre, mais possible) ...
Il suffirait qu'il ait deux forms (l'une nommée Form1 et l'autre .... Picture1...... 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...

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 !!!!

Tordu ce code

Il faut le faire !!!!

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.

[ucfoutu]

Avec Select Case ....

Exemple :

Code :

Sélectionner tout - Visualiser dans une fenêtre à part

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)

[Micklabrute]

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

ton toto signifi quoi??

[Micklabrute]

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