Question

vb.NET 如何在运行中用按钮更改其他文本框的text属性

程序是这样的：
运行时会产生20个文本框（name为tb1-tb20）和1个按钮.
按钮的click事件检查8个文本框哪一个输入了特定的字符，然后将此文本框的enable改为false。
代码应该怎么写？我不知道应该如何动态的控制某一控件的属性。请高手指点，谢谢！
上面打错了，“检查20个文本框”

Answer 1

    Private Sub Button1_Click(sender As Object, e As EventArgs) Handles Button1.Click
        Dim tb() As TextBox = {tb1, tb2, tb3, tb4, tb5, tb6, tb7, tb8, tb9, tb10, _
                            tb11, tb12, tb13, tb14, tb15, tb16, tb17, tb18, tb19, tb20}
        For i = 0 To tb.Length - 1
            If tb(i).Text <> "" Then tb(i).Enabled = False
        Next
    End Sub

Answer 2

按下按钮后，依次检查20个文本框，代码如下

Private Sub Button1_Click(sender As Object, _
                e As EventArgs) Handles Button1.Click
                
    ' 检查TextBox1 是否包含 a
    If TextBox1.Text.Contains("a") Then
       TextBox1.Enabled = False
    Else
       TextBox1.Enabled = True
    End If
    
    ' 检查TextBox2 是否包含……
    ……
    
End Sub

追问

这样查下去岂不是很麻烦……

追答

也可以考虑遍历所有TextBox

For Each t As Control In Me.Controls
    '如果控件是TextBox
    If TypeOf t Is TextBox Then
        With CType(t, TextBox)
            '如果Text包含 "a"
            If .Text.Contains("a") Then
                .Enabled = False
            End If
        End With
    End If
Next

从上面代码看出，遍历控件虽然代码简化很的多，但是没办法对不同的TextBox进行特定的检查了。

毕竟，有20个文本框需要判断，编程工作确实不小（力气活）

Answer 3

tb1.Text = "新文本属性" ‘改变tb1的Text属性
tb1.Enable = False