Remplir simultanément plusieurs combobox par datareader

Bonjour, je bloque sur un sujet depuis qqes temps.
Je souhaite remplir plusieurs combobox au chargement de la form à partir d'un datareader mais je n'y arrive pas.
D'habitude, j'utilise le nom précis de la combo à remplir genre:

Code:

---

Combo.Items.Add(datareader("Nom"))

---

Mais là comme il y a de nombreuse combo Box je voulais faire un truc du genre:

Code:

---

1 2 3

For x as integer =1 to 30 Me.Controls.Item("Combo" & x.ToString).Items.Add(datareader("Nom")) Next x

---

Sauf qu'il est impossible d'utiliser le .Items.add, du coup j'ai créer un modèle de combobox que j'ai chargé comme je voulais, mais je n'arrive pas à copier la liste des items sur mes 30 autres combobox.

Qu'est ce que j'ai pas bien fait?
Merci d'avance de votre aide

Bonjour

Je crois que la solution pour ta demande est la suite :

Code:

---

1 2 3 4 5 6

For Each Ctl In Me.Controls If TypeOf Ctl Is ComboBox Then Ctl.Items.Add(datareader("Nom")) End If Next

---

Bien à vous

Cdt ,