Question

vb.net中如何给多个textbox赋值？

vb中这段函数用vb.net 如何实现：
for i=0 to 200
if ShowFlag(i)=ture then
textbox(i)="ok"
end if
next i
textbox(i)="ok" 应该为textbox(i).text="ok"

Answer 1

定义一个TextBox类型的数组或者列表，然后把textbox都添加进去，就可以像你说的那么用了

Answer 2

窗体上设置几个textbox控件，一个button控件，执行下面这段代码，ok了

Private Sub Button1_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles Button1.Click
Dim ctemp As TextBox

For Each ct As Control In Me.Controls
If TypeOf ct Is TextBox Then
ctemp = ct
ctemp.Text = "aaa"
End If
Next
End Sub

Answer 3

窗体上设置几个textbox控件，一个button控件，执行下面这段代码，ok了

Private Sub Button1_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles Button1.Click
Dim ctemp As TextBox

For Each ct As Control In Me.Controls
If TypeOf ct Is TextBox Then
ctemp = ct
ctemp.Text = "aaa"
End If
Next
End Sub