fonctionRésolu

Question

Bonjours, Je me suis mis il y a 3 mois à vb6
ayant lus comment faire un fonction, j'avais la quasi certitude d'avoir bien compris qu'une fonction renvoyait une valeur.

Exemple: appel de la fonction
Private Sub Command1_Click()
Call test(x 1, y 2, z = 3)
End Sub

Fonction:
Function test(x, y, z As Variant)
Form1.Text1 = x + y + z
End Function

Je pensais obtenir 6 mais j'obtien 0...Pourquoi?

Merçi d'avance


Gnain!

Gnain · Accepted Answer

Merçi a tous!
ça me servira beaucoup.

Gnain!

davidmaillard · Answer

Salut
Dans ton appelle de la function, il ne faut pas assignée une valeur a tes variable, mais mettre la valeur seule.

Private Sub Command1_Click()
Call test(1,2,3)
End Sub

davidmaillard · Answer

Tu peut aussi indiquer d'autre variable dans ton call

 a 10 : b 20 : c = 30
 Call test(a, b, c)

hellangel777 · Answer

Bonjour,

Le type Variant n'est pas forcement judicieux. Evite le le plus possible. Surtout si tu sais quel type doit être utilisé.

Exemple: appel de la fonction
 
Private Sub Command1_Click() 
Call test(1,2,3) 
End Sub 

Function test(x, y, z As integer) 
Form1.Text1 = x + y + z 
End Function 




HellAngel777
Les machines ne font pas d'erreurs
Heureusement nous sommes humains

ucfoutu · Answer

Bonjour,

Je crois que vous passez tous à côté de la vocation même d'une fonction (retourner une valeur) !

Voici, à main levée, ce qui devrait être fait (exemple) :

Private Sub Command1_Click()
  dim a as integer, b as integer, c as integer
  a = 1 : b= 2 : c = 3
  Form1.Text1 = test(a,b,c)
End Sub


private Function test(x as integer, y as i nteger, z as integer ) as integer
  test = x + y + z
End Function



____________________
Vous aimez Codes-Sources ? Il vous aide ? Cliquez ici pour l'aider à continuer
Cliquer sur "Réponse acceptée"  en bas d'une solution adéquate est

hellangel777 · Answer

@ucfoutu
Olala... En effet. Je crois que le lundi matin est à banir de la semaine...
Merci de nous remettre sur le droit chemin et personnellement je m'excuse d'être passée autant à coté...
Bon courage à tous

HellAngel777
Les machines ne font pas d'erreurs
Heureusement nous sommes humains

Gnain · Answer

Gnain!

Fonction

7 réponses

Votre réponse

Discussions similaires