Warning: file_get_contents(/data/phpspider/zhask/data//catemap/1/vb.net/14.json): failed to open stream: No such file or directory in /data/phpspider/zhask/libs/function.php on line 167

Warning: Invalid argument supplied for foreach() in /data/phpspider/zhask/libs/tag.function.php on line 1116

Notice: Undefined index: in /data/phpspider/zhask/libs/function.php on line 180

Warning: array_chunk() expects parameter 1 to be array, null given in /data/phpspider/zhask/libs/function.php on line 181
Vb.net 禁用按钮后启用按钮_Vb.net - Fatal编程技术网

Vb.net 禁用按钮后启用按钮

Vb.net 禁用按钮后启用按钮,vb.net,Vb.net,我正在制作一个接受客户订单的程序,该程序的用户不能向listview添加超过10个项目。所以我做了一个计数器,每次他们按下按钮时递增,每次他们按下删除按钮时,它都会从计数器中拿走一个。问题是,当用户按下保存按钮,然后删除该订单时,该按钮不会再次启用 Private Sub drinkSavebtn_Click(sender As Object, e As EventArgs) Handles drinkSavebtn.Click colaCounter.Maximum

我正在制作一个接受客户订单的程序,该程序的用户不能向listview添加超过10个项目。所以我做了一个计数器,每次他们按下按钮时递增,每次他们按下删除按钮时,它都会从计数器中拿走一个。问题是,当用户按下保存按钮,然后删除该订单时,该按钮不会再次启用

    Private Sub drinkSavebtn_Click(sender As Object, e As EventArgs) Handles drinkSavebtn.Click

        colaCounter.Maximum = 10
        cola = drinkOutput.Items.Add("Cola") 'prints the name of the beverage to the list view
        cola.SubItems.Add(colaCounter.Value.ToString) 'the amount of beverages orders are added through a sub item and converted to a string

        LemonadeCounter.Maximum = 10
        lemonade = drinkOutput.Items.Add("Lemonade")
        lemonade.SubItems.Add(LemonadeCounter.Value.ToString)

        waterCounter.Maximum = 10 'sets the maximum amount of drinks you can order
        water = drinkOutput.Items.Add("Water")
        water.SubItems.Add(waterCounter.Value.ToString)

        fizzyOrangeCounter.Maximum = 10
        fizzyOrange = drinkOutput.Items.Add("Fizzy Orange")
        fizzyOrange.SubItems.Add(fizzyOrangeCounter.Value.ToString)


        drinkSaveBtnCounter += 1

        If drinkSaveBtnCounter = 0 Then
            drinkSavebtn.Enabled = True

        ElseIf drinkSaveBtnCounter = 1 Then 'stops the user from being able to enter more than 10 of one drink
            drinkSavebtn.Enabled = False
        End If
    End Sub

    Private Sub drinkDeleteBtn_Click(sender As Object, e As EventArgs) Handles drinkDeleteBtn.Click
        drinkOutput.Items.Clear() 'clears the items of a table, leaving the columns intact
        drinkSaveBtnCounter -= 1
    End Sub


在drinkDeleteBtn_单击方法中重置计数器后,尝试添加drinkSavebtn.Enabled=True

Private Sub drinkDeleteBtn_Click(sender As Object, e As EventArgs) Handles drinkDeleteBtn.Click
    drinkOutput.Items.Clear() 'clears the items of a table, leaving the columns intact
    drinkSaveBtnCounter -= 1
    drinkSavebtn.Enabled = True
End Sub

难道你不启用删除吗?