vb.net Control 类循环把字符串TextBox1，TextBox2，TextBox3...赋值给文本框控件名

您可以使用 Controls 集合来循环遍历窗体上的所有控件，然后判断控件类型是否为 TextBox，如果是，则将字符串赋值给该文本框控件的 Text 属性。下面是一个示例代码：

For Each ctrl As Control In Me.Controls
    If TypeOf ctrl Is TextBox Then
        Dim txtBox As TextBox = DirectCast(ctrl, TextBox)
        Select Case txtBox.Name
            Case "TextBox1"
                txtBox.Text = "some text 1"
            Case "TextBox2"
                txtBox.Text = "some text 2"
            Case "TextBox3"
                txtBox.Text = "some text 3"
            ' add more cases as needed
        End Select
    End If
Next

这个代码假设您的文本框控件名分别为 TextBox1、TextBox2、TextBox3，您可以根据实际情况修改 Case 语句中的文本框控件名和要赋的值。