für jeden Schleife Textbox Wert

Question

Hallo Jungs, ich mit Textbox ein Problem habe

For Each textBox As TextBox In GroupBox1.Controls.OfType(Of TextBox)().OrderBy(Function(b) b.TabIndex) 
      textBox.Text = 1 
      textBox.Text = 2 

nächste hier i 8 haben Textbox wie

textbox1  textbox2 
textbox3  textbox4 
textbox5  textbox6 
textbox7  textbox8 

i textbox1 = 1 und TextBox2 = 2 TextBox3 will = 1 und textbox4 = 2 und son ich habe versucht mit

anderen Namen mit Textbox aber ich kann nicht jede mögliche Hilfe bitte nur versuchen, mich und versuche, ...

Answer 1

versuchen, die Textbox mit Direct

durch seinen Namen rufen

For i = 1 to 8 
     DirectCast(Me.Controls.Find("textbox" & i, True), Textbox).text = i 
Next 

oder genauer zu prüfen, ob ich gerade oder ungerade ist und entsprechend zuweisen

For i = 1 to 8 
     if i mod 2 = 0 then 
      DirectCast(Me.Controls.Find("textbox" & i, True), Textbox).text = "2" 
     else 
      DirectCast(Me.Controls.Find("textbox" & i, True), Textbox).text = "1" 
     end if 
Next 

Ich habe es jedoch nicht getestet.