[RESOLVED] POS - What is wrong with my math?

[dclamp]

ok the following is code to add tax to the transaction. It is not coming out correctly...

intSubTotal = (Val(txtStateTax.Text) * Val(txtSubTotal.Text))
    frmPOS_Finish.txtGrandTotal.Text = (Val(txtSubTotal.Text) + Val(intSubTotal))
    frmPOS_Finish.txtGrandTotal.Text = Format(frmPOS_Finish.txtGrandTotal.Text, "#,###.##0")