PureBasic

Salut a tous !
Une question un peu bête mais j'aimerais savoir pourquoi le code suivant ne fonctionne pas.

Select Variable$
Case "a" Or "A"
   ....
EndSelect

J'aimerais que le programme execute les "...." si Variable$ est égal à "a" ou à "A" mais ca ne marche pas.

Case ne supporte qu'un argument, apparemment !

C'est c** parceque j'en ai besoin... Fred ?

ça a déjà été demandé plusieurs fois sur le forum anglais , fais aussi la demande sur le forum français , Fred va peut-être finir par l'ajouter

en attendant , tu peux toujours faire comme ça

Code : Tout sélectionner

Variable$="b"
Select UCase(Variable$) 
   Case "A" 
      Debug "variable = a ou A"
   Case "B"
      Debug "variable = b ou B"
EndSelect

Pratique ton truc Comtois, mais pas pour ce que je veux faire... Bon ba je vais carburer a coup de if elseif !

Ou une structure if elseif .....elseif................endif
cette condition prenant plusieurs arguments.

[edit]
A une minute près, c'était bon, dommage

la prochaine fois, j'écrirais en assembleur!

Bonjour à tous

Code : Tout sélectionner

Case "A" or "a"

a pour effet de prendre la valeur de la comparaison ("A" or "a") et non ce que tu voulais c'est à dire case "A" or Case "a" .
pour verifier essaye :

Code : Tout sélectionner


Variable=1
Select Variable
  Case "A" Or "a"
    Debug "oui"
  Default 
    Debug "non"
EndSelect

Je propose comme Comptois

Code : Tout sélectionner

Select UCase(Variable$)  ; ça le met en majuscule
Case "A"  ; ça marchera pour a et A
   .... 
EndSelect

Ca répond bien à ta question. Maintenant, si tu veux faire un
Case "A" or "B", je suis d'accord que cette solu ne marche pas.

je vais voir ce qu'il est possible de faire

Cool

Merci Fred

merci

avec le "to" ce serais bien aussi :

case "A" to "Z"
....

case "0" to "9"
....

patrick

et comment veut tu que le compilo fasse un
case "hdfgd" to "165gfdgfd"

cederavic a écrit :et comment veut tu que le compilo fasse un
case "hdfgd" to "165gfdgfd"

turbo pascal y arrive bien... alors pourqoui pô pb ...

patrick

PureBasic

Select Case

Select Case