Question sur les fonctionsRésolu

Question

Bonsoir,



quelqu'un pourrait me dire pourquoi je ne suis pas capable de faire afficher le message Salut les amis en utilisant le code suivant?



Private Sub Command1_Click()

Dim yy As String

Dim tt As String

yy = "Salut "

MsgBox tst(yy)

MsgBox tt

End Sub



Function tst(ww As String) As String

ww = ww & " les amis"

End Function


xyron

Gobillot · Accepted Answer

Private Function tst (ww As String) As String

tst = ww & " les amis"

End Function

Daniel

xyron · Answer

&#199;a ne mache pas. La fonction va bien chercher la valeur , mais elle ne l'affiche pas!




xyron

xyron · Answer

&#199;a a march&#233; finalement... Je crois que je suis trop fatigu&#233;.



Merci et bonne soir&#233;e

xyron

Gobillot · Answer

Private Sub Command1_Click()

    Dim yy As String

    Dim tt As String

    yy = "Salut "

    MsgBox tst(yy)   '&#231;a doit afficher "Salut les amis"

    MsgBox tt          'ici &#231;a affiche rien

    tt = tst(yy)

    MsgBox tt        '&#231;a doit afficher "Salut les amis"

End Sub



                
                Private Function tst (ww As String) As String

     tst = ww & " les amis"

 End Function



&#224; moins que tu sois en .Net


Daniel

Gobillot · Answer

1 seconde trop tard

Daniel

xyron · Answer

c'est ok Daniel. 



Le r&#233;ponse que tu m'avais donn&#233;e &#233;tait la bonne. 

Il y a un bon bout de temps que je n'avais utilis&#233; vb6 . J'avais oubli&#233;
que le nom de la fonction devait &#234;tre utilis&#233; pour l'assignation de la
valeur.



Merci encore.

xyron

Question sur les fonctions

6 réponses

Discussions similaires