mars073 Posté(e) March 13, 2014 Signaler Share Posté(e) March 13, 2014 Shalut all, Comme je l'avais dis dans un tuto précédent je vais vous expliquer comment faire des tests et c'est super simple Il y a juste plein de façon de le faire! xD Pour faire un test simple, on fait comme ceci: If [valeur à tester] [symbôle du test (voir le bas)] [La valeur à la quelle elle est comparée] then [Le code à exécuter si le test se révèle positif] End If exemple: If check = True then Process.start("W:\tourbilol.exe") End If Imaginons que nous programmons un jeu et que vous voulons tester la position_X soit 3 et que le position_Y soit 5 on va faire comme cela: If (position_X=3) and (position_Y=5) then [Le code à exécuter si le test se révèle positif] End If Il suffit juste de mettre les 2valeurs entre parenthèse et de mettre un "And"(et) entre les deux.^^ Toujours facile.. alors on va compliquer les choses x) Imaginons toujours notre petit jeux, cette fois je veux que la position_X soit 3 ou 5 et que que la position_Y soit 5 toujours simple mais bon : If ((position_X=3) Or (position_X=5)) and (position_Y=5) then [Le code à exécuter si le test se révèle positif] End If on ajoute encore des parenthèses et on met un "Or"(ou) même principe que le "And" On monte encore un peu dans la difficulté Cette fois la position_X doit être compris entre 3 et 5 et la position_Y doit doit être 5. è_é If ((position_X>3) And (position_X<5)) and (position_Y=5) then [Le code à exécuter si le test se révèle positif] End If Cette fois le test demande si le nombre est supérieur et si il est inférieur ^^ Maintenant on va demander que si number est 1 il envoie un message "c'est 1!"; si c'est 2 un message "c'est deux" et si ce n'est pas un des deux, le programme envoie un message "chiffre inconnu", et pour cela on va mettre un "Else If": If number=1 then Msgbox("c'est 1!") Else If number=2 then Msgbox("c'est 2!") Else Msgbox("chiffre inconnu") End If Edit: j'ai oublié de mettre comment faire pour faire directement un test pour tester si quelque chose n'est pas, un genre d'"Else If" mais direct dans le "If": If Not (number=0) then [je ne pense pas que les parenthèses sont obligatoire mais je les mets toujours] MsgBox("Le chiffre n'est pas zéro!") End If Il existe aussi la méthode du "Case Of" : Select Case number Case 1 Msgbox("c'est 1!") Case 2 msgbox("c'est deux!") Case Else Msgbox("chiffre inconnu") End Select dans un case of on peu directement tester si la valeur et entre 2 nombre avec un to, exmple: si number est entre 3 et 5, il envoie un message "boum !": Select Case number Case 1 Msgbox("c'est 1!") Case 2 msgbox("c'est deux!") Case 3 to 5 msgbox("boum !") Case Else Msgbox("chiffre inconnu") End Select Les symboles de test logique: = : égale à ... > : supérieur à ... < : inférieur à ... >= : supérieur ou égale à... <= : inférieur ou égale à... <> : inférieur ou supérieur à... Bonne programmation a tous! Cordialement, Mars073 1 Citer Lien vers le commentaire Partager sur d’autres sites More sharing options...
Azad Posté(e) March 13, 2014 Signaler Share Posté(e) March 13, 2014 Excellent travail, mars. Les exemples sont utiles pour la compréhension. +1 Rep. Citer Lien vers le commentaire Partager sur d’autres sites More sharing options...
Recommended Posts
Join the conversation
You can post now and register later. If you have an account, sign in now to post with your account.