textvakken doorlopen met lus

[Sennec]

Hallo!

Na het internet wat afgezocht te hebben, ga ik mjin laatste hoop op jullie zetten.
de situatie:

Ik heb veel textboxen in 1 formulier genaamd als Speler1, Speler2, ..., Speler12.
Is er een manier om dit met een for lus op te lossen, bv/

For i=1 tot 12
Speler(i) = "voorbeeld"
next

Ik hoop dat er zoiets bestaat, en anders wordt het typen !

 

[The Mighty Atom]

Wil je tekst in die textboxen invoeren of ophalen?

 

[Sennec]

nu wil ik Speler1 tot Speler 12 een waarde geven

ophalen is voor later :d

 

[The Mighty Atom]

Probeer dit:

For Each tb As Control In Me.Controls
If TypeOf tb is TextBox Then
tb.Text = "Voorbeeld"
End If
Next

 

[Sennec]

nu gaat hij alle textboxen met dezelfde waarde vullen.
ik heb een array met 12 gegevens
en ik zou dan Textbox1 moeten laten overeenkomen met array(0)
textbox2.text = array(1)
textbox3.text = array(2)
enz.
ik had het wat duidelijker kunnen uitleggen in het begin sorry daarvoor

 

[The Mighty Atom]

Dan moet het denk ik zo:

Dim ArrIndex As Integer = 0

For Each tb As Control In Me.Controls
If TypeOf tb is TextBox Then
tb.Text = array(ArrIndex)
ArrIndex += 1
End If
Next

 

[CaptainBri]

Ik zou dit ook wel graag willen weten
Bijvoorbeeld; textbox(i).Text = array(i) werkt helaas niet

En met een foreach, gaat deze dan beginnen bij de 1e textbox? Of...

 

[The Mighty Atom]

En met een foreach, gaat deze dan beginnen bij de 1e textbox? Of...

Ik geloof dat die begint bij de hoogste/laatste textbox. Moet op zich niks uitmaken...