fonction et appel de fonctionRésolu

Question

Sal,

J'ai un truc comme ceci

Function machin (paramarray texte()) as boolean
if texte()=x then machin = true
end function

call machin

tout va très bien, mais si je mets
if machin = true then etc

ca capote, ca coince dans la fonction.
 C'est pas bien grave, mais j'ai l'impression, je sais pas, je voudrais piger, que la fonction est appellée une deuxième fois et que ca casse tout.

thierrydelepine · Accepted Answer

petit rappel

tu créé une fonction qui doit te renvoyer une valeur :

Function machin (paramarray texte()) as boolean
if texte()=x then machin = true
end function

mais comme ta fonction renvoi quelque chose tu ne dois pas l'apeller par : 

call machin

 mais par :

dim n as boolean
n = machin(texte()) 

et la tu fais if n = True then ......

ca marche mieux.

jrivet · Answer

Salut,

Effectivement, ta fonction est rappelée.
Ca capote en plus car il doit te dire qu il manque les parametre de la fonction non?

Dans ta fontion can tu met Machin = True ca fixe la valeur que va retourner la fonction machin,

Mais si dans un endroit tu met IF Machin = True then ...

Vb va executer la fonction en premier et apres teste si le resultat de ta fonction a ete True.

Je sais pas si j ai ete clair.
@+
Julien
-----------------------------------------------------------
 :big)  Essai ca sinon on trouvera autre chose  ;) 
-----------------------------------------------------------

jrivet · Answer

salut,
Oui ou alors faire ca:

if (machin(text())= TRUE) then

ca devrait marcher aussi.
@+
Julien
-----------------------------------------------------------
 :big)  Essai ca sinon on trouvera autre chose  ;) 
-----------------------------------------------------------

cs_lacomm · Answer

Bien merci messieurs,

J'ai enfin compris.
Par contre, un autre problème:

Function machin (paramarray texte()) as boolean
if texte()=x then compteur1=compteur1+1
if texte()=y then compteur2=compteur2+1
if texte()=z then compteur3=compteur3+1
end function

n=machin(texte())
if n=true then msgbox "ok"
***ici arrive le problème***
msgbox compteur1
msgbox compteur2
msgbox compteur3

Donc est-il possible de récupérer les valeurs compteur1, 2 et 3 ?
J'ai déclaré compteur1 en public.
(il me semble que ca marchait auparavant)

Bien merci encore

cs_lacomm · Answer

En fait il faut faire comme ceci:
Function  machin (paramarray texte()) as integer
if texte()=x then machin=1
etc
end function

if machin(texte())=1 then compteur1=compteur1+1

Fonction et appel de fonction

5 réponses

Discussions similaires