如何将动态创建的文本框文本值分配给vb.net中的变量

时间:2016-07-19 19:29:39

标签: vb.net windows forms visual-studio

我试图使用组合框和按钮制作一个程序来平均数字。我做了组合框,编号从1到10,当它改变程序创建文本框作为数字。但我可以将输入的文本分配给变量,这样我就可以完成计算

Public Class Form1
    Dim num As Integer = 1
    Private ReadOnly _Textboxes As New List(Of TextBox)
    Private Sub ComboBox1_SelectedIndexChanged(sender As Object, e As EventArgs) Handles ComboBox1.SelectedIndexChanged
        _Textboxes.ForEach(New Action(Of TextBox)(AddressOf Controls.Remove))
        _Textboxes.Clear()
        num = ComboBox1.Text

        For i = 1 To num
            Dim TB As New TextBox
            TB.Size = New System.Drawing.Size(60, 20)
            TB.Font = New System.Drawing.Font("arial", 20)
            TB.Location = New Point(10, i * 40)
            TB.Name = "tbt" & i

            Select Case i
                Case 1 To 5
                    TB.Location = New Point(10, i * 45)
                Case 6 To 10
                    Dim i2 As Integer = i - 5
                    TB.Location = New Point(80, i2 * 45)
            End Select
            Controls.Add(TB)
            _Textboxes.Add(TB)
        Next
    End Sub
End Class

0 个答案:

没有答案