Recuperer les noms de checkbox par une boucle

Bonjour,
j'ai un petit souci, je voudrais recuperer les noms de mes checkbox qui sont cochés par une boucle et les affichés dans un msgbox, Merci de votre aide.

Probleme résolu
voila le code si quelq'un aura le meme probleme.

Code:

---

1 2 3 4 5 6 7

For Each control As Control In Me.Controls   If (TypeOf control Is CheckBox) AndAlso CType(control, CheckBox).Checked Then MsgBox(control.Text) End If   Next

---