Fonction Xojo

International Français
1

Bonjour,
Je cherche a comprendre comment une fonction retourne plusieurs rsultats
Dans Vb les arguments et les resultats sont meleangs comme: Function Cercle( rayon as double, surface as double, Circonference as double)

[code]Function Cercle(rayon as Double) As Double

Dim Surface As Double
Dim Circonference as double
r=rayon

 Surface= Pi * r*r
 Circonference = 2*Pi * r

Return [/code]. ici, return ne retourne qu’un sel resultat.

2

Il faut passer les lments dont on souhaite rcuprer la valeur par rference plutt que par valeur en utilisant le mot-cl ByRef.

Function Cercle(rayon as Double, ByRef Surface As Double, ByRef Circonference As Double ) Surface= Pi*rayon*rayon Circonference = 2*Pi*rayon End

Et on l’appele comme a:

Dim r, s, c As Double r=5.3 Cercle( r, s, c ) MsgBox "Surface =" +Str( s ) + EndOfLine + "Circonference=" + Str( c )

3

Parfait, merci Eric.