Question

我创建了一些带有文本框和按钮的标签页。每当我按下按钮时，最后一个下面会出现一个新文本框：

    Dim txtbox As New TextBox()
    txtbox.Location = New Point(TextBox4.Left, TextBox4.Top + 25 * txtbox7count)
    TabPage7.Controls.Add(txtbox)
    txtbox7count += 1

有没有办法通过button_click存储每个标签页的每个文本框输入？

EDIT 现在我尝试了以下：

    For Each txtbox As TextBox In Me.Controls.OfType(Of TextBox)()
        Dim j As String = txtbox.Text
    Next
    Label9.Text = j

我实验性地尝试读取一个TextBox输入但我的Label9在按下按钮后没有显示任何内容

Answer 1

使用以下代码迭代表单上的所有TextBox控件：

For Each tb As TextBox In Me.Controls.OfType(Of TextBox)()
    ' Put code here. E.g. tb.Text will return the text of each control within this For..Each statement.

Next

备注

上面的代码只能在它所引用的Form类中按工作，但是Me也可以替换对项目中任何Form的引用。

其他控件可以通过用您想要的任何类型的控件替换单词TextBox的两个出现来以类似的方式迭代。

如何从动态创建的TabPageControls中读取数据

1 个答案: