Boucle pour répeter un remplissage de textboxRésolu

Question

Bonjour a tous voici mon petit problème




J'ai dans un "tabpage" (onglet) plusieurs "Groupbox" qui regroupe plusieurs "Combobox" et "TextBox".

La première combobox "Numcomp "est celle ou sont chargés les  références par requête sql.

Ensuite viens la Combobox " Nomcomp "qui contient le non du composant sélectionné dans la première combobox.

Comme il y plusieurs groupbox je voudrais faire une boucle qui charge les textbox "nomcomp" sans la répéter 10 fois.

 

Voici mon code :

" 
 Dim dr1 As SqlDataReader

 For i = 1 To 12 Step +1

 Dim nom As String = (CType(Numcomp, String) & (i))

 For Each Ctl In Me.Controls

 Ctl.NAME = "groupbox'" & (i) & "'"
 
 sqlSelect1 = ("SELECT REZEPTUR.BEZEICHNUNG,REZEPTUR.ZUSATZ FROM REZEPTUR WHERE REZEPTUR='" & (CType(Ctl.name = "Numcomp'" & (i), ComboBox).SelectedItem) & "'")

 Dim CommandSQL1 As New SqlCommand(sqlSelect1, Con)

dr1 = CommandSQL1.ExecuteReader()

?

?

 Do While dr1.Read()

Desi.i = dr1.GetValue(0)

Classe.i = dr1.GetValue(1)

 Loop

dr1.Close()

 Next
 
 Next

Le probleme c'est que je n'arrive pas a recuperer le nom des combobox "Nomcomp" est ce que quelqu'un à une idée ??

killowat68 · Answer

Sinon j'avais essayer ça aussi 
sqlSelect1 = ("SELECT REZEPTUR.BEZEICHNUNG,REZEPTUR.ZUSATZ FROM REZEPTUR WHERE REZEPTUR='" & (CType(Numcomp, String) & (i))(CType(Numcomp, Object).SelectedItem) & "'")
Mais ça ne marche pas

Boucle pour répeter un remplissage de textbox

1 réponse

Votre réponse