'Simple math using FormatNumber & Formatcurrency



     Private Sub btnCheckout_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles btnCheckout.Click
        '---here is where we are going to calculate the tax and amt. due
        '   We will also format the money correctly so it look like a cash register.

        'FormatNumber and Val are built-in VB Functions
        lblTax.Text = Formatcurrency(txtPrice.Text * 0.08)        'this makes it use 2 decimal places

        lblBalDue.Text = FormatCurrency(CDec(txtPrice.Text) + CDec(lblTax.Text))  'CDec makes VB treat text as currency. CDec=convert to currency

    End Sub