Comment passer un groupe de control en argument d'une fonction

Comment passer un groupe de control en argument d'une fonction ?

Une petite recherche, et tu arrivais là :
http://www.developpez.net/forums/d44...oles-function/

Bonjour,

ceci te permettra-t-il de comprendre et utiliser ?
un groupe de commandbuttons Command1(1), Command1(2), ..... Command1(n)

Appel :

Code:

---

MsgBox toto(Command1)

---

fonction :

Code:

---

1 2 3

Private Function toto(ctrlgroupe As Object) As Integer toto = ctrlgroupe.Count End Function

---

Le plus simplement du monde, donc ...

J ai trouvé

Code:

---

1 2 3 4

Function mafonction (CtlGroupe as Object) as ... ... end function

---

Code:

---

1 2 3

mafonction(mongroupe)

---