Textboxen vullen van uit listbox

[old Hippy]

Hallo allemaal

mijn vraag

Ik heb een listbox met namen uit een sql database.
ik heb 30 textboxen.

Nu wil ik graag een textbox vullen met een naam uit de listbox.
en als een textbox gevuld is hij van zelf de volgende legetextbox in vuld.

Kan iemand mij op weg helpen??

Groeten Old Hippy

 

[hanonymouss]

naam van textbox = ListBox1.SelectedItem

 

[stefanz]

                Dim teller As Integer = 0
        For Each ctrl As Control In Me.Controls
            If TypeOf ctrl Is TextBox Then
                If teller <= ListBox1.Items.Count - 1 Then
                    CType(ctrl, TextBox).Text = ListBox1.Items(teller).ToString
                    teller = teller + 1
                End If
            End If
        Next

 

[old Hippy]

Dank stefanz en hanonymouss
de code van stefanz werk het beste in mijn App.

bedankt kan weer verder
Groet Old Hippy

 

[old Hippy]

Krijg toch een fout.
De conversie van type DataRowView naar type String is ongeldig.

 

[stefanz]

Bij welke regel treedt de fout op?

Misschien is het zo al opgelost:

Dim teller As Integer = 0
        For Each ctrl As Control In Me.Controls
            If TypeOf ctrl Is TextBox Then
                If teller <= ListBox1.Items.Count - 1 Then
                    CType(ctrl, TextBox).Text = ListBox1.Items(teller)[COLOR="#FF0000"].ToString[/COLOR]
                    teller = teller + 1
                End If
            End If
        Next

 

[JoZ1]

Of misschien dat het zoiets moet zijn:

[cpp]ListBox1.Items(teller).Text[/cpp]

of

[cpp]ListBox1.Items(teller).Value[/cpp]

 

[old Hippy]

Hi Bedankt bijde dit is opgelost