Hi, I'm trying to make my programs show 10 in the label if I check 2 checkboxes, which plus 5 each. However, I only get 5 in the label despite the fact that I already checked 2 checkboxes + 5. Please help and thank you. :wave::wave:
Dim dblMon As Double
Private Sub frmOrder_Load(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles MyBase.Load
MessageBox.Show("Welcome to our restaurant.")
End Sub
Private Sub chkOp1_Click(ByVal sender As Object, ByVal e As System.EventArgs) Handles chkOp1.Click
If chkOp1.Checked = True Then
lblMon.Text = dblMon + 5.0
ElseIf chkOp1.Checked = False Then
lblMon.Text = dblMon
End If
End Sub
Private Sub chkOp2_Click(ByVal sender As Object, ByVal e As System.EventArgs) Handles chkOp2.Click
If chkOp2.Checked = True Then
lblMon.Text = dblMon + 5.0
ElseIf chkOp1.Checked = False Then
lblMon.Text = dblMon
End If
End Sub
End Class
Dim dblMon As Double
Private Sub frmOrder_Load(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles MyBase.Load
MessageBox.Show("Welcome to our restaurant.")
End Sub
Private Sub chkOp1_Click(ByVal sender As Object, ByVal e As System.EventArgs) Handles chkOp1.Click
If chkOp1.Checked = True Then
lblMon.Text = dblMon + 5.0
ElseIf chkOp1.Checked = False Then
lblMon.Text = dblMon
End If
End Sub
Private Sub chkOp2_Click(ByVal sender As Object, ByVal e As System.EventArgs) Handles chkOp2.Click
If chkOp2.Checked = True Then
lblMon.Text = dblMon + 5.0
ElseIf chkOp1.Checked = False Then
lblMon.Text = dblMon
End If
End Sub
End Class