Trouble compounding sum

EDN Admin · Dec 6, 2012

Hi. Im having trouble with a program that should be fairly simple. What its supposed to do is determine the price of an item based on how many there are. Every time it exceeds a certain amount of items however, the cost drops 5 cents.
It works fine up until 10, the first thresh hold. Then it just seems to drop off everything to the left of the decimal point for the numbers after. To clarify, What I mean is that when it says 5.00 when I enter ten, that would be correct, but
when I enter 11 it only says .45 when 5.45 should be the correct answer. This repeats at the second thresh hold, at 50. Does anybody know what I could do?<span style="font-size:small 

<span style="color:blue Dim WidgetsEnteredInteger 
<span style="color:blue Dim WidgetsZeroToTenInteger 
<span style="color:blue Dim WidgetsElevnToFiftyInteger 
<span style="color:blue Dim AdditionalWidgetsInteger 

<span style="color:blue Dim WidgetZeroToTenDecimal 
<span style="color:blue Dim WidgetElevenToFiftyDecimal 
<span style="color:blue Dim AdditionalWidgetDecimal <span style="color:blue
As <span style="color:blue Decimal = 0.4D

<span style="color:blue Private 

WidgetsEnteredInteger = <span style="color:blue Integer.Parse(WidgetsPurchasedTextBox.Text)



 WidgetsZeroToTenInteger = WidgetsEnteredInteger


WidgetsElevnToFiftyInteger = WidgetsEnteredInteger - 10


AdditionalWidgetsInteger = WidgetsEnteredInteger - 50

<span style="color:blue End 


PriceDecimal = WidgetsZeroToTenInteger * WidgetZeroToTenDecimal


PriceDecimal = WidgetsZeroToTenInteger * WidgetZeroToTenDecimal + WidgetsElevnToFiftyInteger * WidgetElevenToFiftyDecimal


PriceDecimal = (WidgetsZeroToTenInteger * WidgetZeroToTenDecimal) + (WidgetsElevnToFiftyInteger * WidgetElevenToFiftyDecimal) + (AdditionalWidgetsInteger * AdditionalWidgetDecimal)


 

View the full article

Trouble compounding sum

EDN Admin

Well-known member

Similar threads