une function avec un retour de function

Bonjour,

je suis debutant en access , je voudrais creer une function qui me reenvoi un entier un peux comme :

Code:

---

1 2 3 4 5

Public function toto(chiffre As integer) Dim compteur As integer   return compteur

---

La meme chose en VBA .

MERCI

Salut,

'Simplement' comme ça

Code:

---

1 2 3 4 5

Public function toto(chiffre As integer) as Integer Dim compteur As integer   toto = compteur end function

---

;)

Merci et comment faire de l'autre function pour recupere les resultat de Test :

Genre :

Code:

---

1 2 3 4 5 6 7 8 9

sub toto() ........ Test(argument) recupere la valeure de Test End Sub

---

MERCI

Comme ça

Code:

---

1 2 3 4 5 6 7 8 9 10 11 12 13

sub toto()   Dim mavariable as type_de_retour ........ mavariable = Test(argument)   End Sub   Function test () as type_de_retour   test = variable   End Function

---

Tu as pleins de tutos sur le VBA ici.

;)