Quantcast
Channel: VBForums - Visual Basic .NET
Viewing all articles
Browse latest Browse all 27418

Sigh, I'm stuck again T_T.

$
0
0
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

Viewing all articles
Browse latest Browse all 27418

Trending Articles



<script src="https://jsc.adskeeper.com/r/s/rssing.com.1596347.js" async> </script>