Discussion :

[quentincabo]

Bonjour,

Est-il possible de créer une fonction qui renvoi 2 valeurs?

Merci d'avance

[GriffinK]

On pourrait imaginer que tu mets les valeurs dont tu as besoin dans un tableau d'Object, et tu retournes ce tableau. A toi ensuite de faire le traitement adéquat

[OhMonBato]

De manière très basique tu peux faire un truc du style :

Code :

Sélectionner tout - Visualiser dans une fenêtre à part

1
2
3
4
5
6
7
8
9
10
11
12
13
PrivateSub Button1_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles Button1.Click
Dim a AsInteger = 4
Dim b AsInteger = 12
Dim Som AsInteger
Dim soustract AsInteger
CalcAB(a, b, Som, soustract)
MsgBox(Som.ToString & " " & soustract.ToString)
EndSub
PrivateFunction CalcAB(ByVal x AsInteger, ByVal y AsInteger, ByRef Plus AsInteger, ByRef Moins AsInteger)
Plus = x + y
Moins = x - y
EndFunction

[quentincabo]

merci de vos réponses.

je crois que mon problème est résolu