Phone Bill

I considered going with ElseIf statements but suspected it might not work, so I just used If Then statements.

Dim Charge As Decimal = 25

        If Me.chkForward.Checked Then
            Charge = 3.5 + Charge
        End If
        If Me.chkWaiting.Checked Then
            Charge = 3.5 + Charge
        End If
        If Me.chkID.Checked Then
            Charge = 3.5 + Charge
        End If

        Me.lblAnswer.Text = Charge