Question

我有一项任务是创建一个基本上对多项选择测试进行评分的程序。我有一个带有20个文本框的表单来接受输入（只有字母“a”，“b”，“c”或“d”），一个带有正确答案的数组，我创建了一个数组来保存所有文本框：

debug=False

我知道必须有一种方法来使用For Each，其中控制类型=文本框迭代所有文本框，但我实际上是在实际从文本框中提取值并将它们添加到数组中他们自己的。我已经达到了：

dim txtboxes() as TextBox = {txtInput1, txtInput2...txtInput20}

这根本不是很远......

Answer 1

以下代码应返回文本框值列表。

Public Sub Convert()
        Dim lstTxtBoxValues As List(Of String) = New List(Of String)
        For Each txtBox As TextBox In txtboxes
            lstTxtBoxValues.Add(txtBox.Text)
        Next
    End Sub

vb.net将文本框中的数据添加到数组中

1 个答案: