Simple Math Equation wont work!

[joefox]

Ok this is what i have, but for some reason i double check the calculation and it dosent come out right.

The way i check just to make sure is, i will add shipping and handling + sales amount then * it by the tax amount, and it should come out to the invoice amount, and it dosent.

Public Sub Command1_Click()
Text3.Text = (Val(Text1.Text) / Val(Text2.Text)) * 100
End Sub
 
Public Sub Command2_Click()
' this is where i can put in the value of the part ($4.49) and then have it * by the percentage of the tax
Text5.Text = (Val(Text4.Text) * Val(Text3.Text))
End Sub
 
Private Sub Form_Load()
    Load_Default_Values
End Sub
 
Private Sub Load_Default_Values()
    Text1.Text = ""
    Text2.Text = ""
    Text3.Text = ""
    Text4.Text = ""
    Text5.Text = ""
End Sub