每個循環文本框的值

Question

你好球員我有文本框的問題

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

下一這裏 我有8文本框等

textbox1  textbox2 
textbox3  textbox4 
textbox5  textbox6 
textbox7  textbox8 

我想TextBox1中= 1 1和TextBox = 2 textbox3 = 1和textbox4 = 2和兒子 我已嘗試

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

不同的名稱文本框，但我失敗的任何幫助，請我只是想，並試圖...

Answer 1

嘗試調用它的名字的文本框與directcast

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

或多個正確檢查i是否偶數或奇數和分配相應的

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 

雖然我沒有測試它。