带有数组的小型VB.net学校项目

时间:2015-11-24 09:10:18

标签: arrays vb.net

大家好我是新来的,我试图在vb.net中做一个小项目,它使用一个文本框和一个按钮来填充一个数组(23)。我的变量存储在模块中,当我在文本框中输入文本并单击按钮时,可以将项目添加到数组中。如果数组已满,则应禁用该按钮,因此这是我的代码

Private Sub Button1_Click(sender As Object, e As EventArgs) Handles Button1.Click
    If counter < 23 Then
        array1(counter) = TextBox1.Text
        counter = +1
    Else
        Button1.Enabled = False
    End If
End Sub

这是全局变量

Module Module1
    Public array1(24) As String
    Public counter As Integer
End Module

项目运行但是当我多次点击按钮时按钮没有禁用我认为这是因为计数器没有增加。

1 个答案:

答案 0 :(得分:1)

您的问题是如何向计数器添加1

您必须counter = +1使用counter += 1

这是你应该怎么做的:

    Private Sub Button1_Click(sender As Object, e As EventArgs) Handles Button1.Click
        If counter <= 23 Then
            array1(counter) = TextBox1.Text
            counter += 1
            If counter = 24 Then Button1.Enabled = False
        End If
    End Sub