Fråga : subtrahera 10% från textbox

hi,
jag har en knäppas som, när de trycks på ändringar som bakgrunden färgar, mig önskar också, att den ska dra av 10% från slutsumman av en textbox, då, när du klickas, ändra färgabaksidaen och återtillämpa 10%en. ….,  Kodifiera är så långt:

om percent10.BackColor = Color.LightGray Then
percent10.BackColor = discountlabel för Color.Red
. Text = ”lbltotal 10% rabatt applicerad "
. Text = formaterar (lbltotal Val (. ) För text/10, ”0.00”)
Else

percent10.BackColor = discountlabel för Color.LightGray
. Lbltotal text- = ""
. Text = formaterar (lbltotal Val (. Text) * 0.1, ”0.00”)
avslutar If

This ger några konstiga resultat though, och jag kan inte fungera ut var I-förmiddagen som orätt går.  Kan någon hjälpa?

Thanks " klar "

Svar : subtrahera 10% från textbox

en 10% rabatt är INTE vad du får när du delar vid 10.  Ganska en 10% rabatt är original värderar MINUS10%of som original värderar

Rabatt = 0.1* OriginalValue
DiscountedValue = OriginalValue - rabatt

därefter att få original värdera tillbaka igen, dig skulle tillfogar rabatten till DiscountedValuen:

OriginalValue = DiscountedValue + rabatt