How can i coded the discount formula?

andersonlin · February 18th, 2010, 11:17 PM

I'm new to VS.net 2005.here is a problem when i code the discount formula:

Code:

Dim sinPrice As Single, sinDiscount As Single, sinTotal As Single
        Dim intNumber As Integer

        sinPrice = Val(txtPrice.Text)
        sinDiscount = Val(txtDiscount.Text)
        intNumber = Val(txtNumber.Text)

        sinTotal = (sinPrice * intNumber) * sinDiscount * 100%
        txtTotal.Text = sinTotal

how can i calculate the discount formula?

TKS~~~~

om_prakash · February 19th, 2010, 01:19 AM

For example, if you input
price = 500
discount = 10 (this is value or percantage?)
number=2
What is the expected output ?

andersonlin · February 19th, 2010, 08:12 AM

here is the question:
make a project,when user input the discount(Number not Percentage),then input the price & amount,calculate the total.retain 3 decimal.
so,is input the Number in discount,and output the total.i don't know how to descrip in VB.

om_prakash · February 19th, 2010, 09:54 AM

Code:

sinPrice = Val(txtPrice.Text)
sinDiscount = Val(txtDiscount.Text)
intNumber = Val(txtNumber.Text)

'This will give you the total excluding discount
sinTotal = (sinPrice - sinDiscount) * intNumber

andersonlin · February 19th, 2010, 10:57 PM

but Om_prakash,the result still not correct.
anyone else?

om_prakash · February 20th, 2010, 06:34 AM

I am still not clear on what output you want...

Please tell me what should be the total value for below case:

Discount: 5
price: 200
Amount: 20

andersonlin · February 20th, 2010, 10:13 AM

Quote:

Originally Posted by om_prakash

I am still not clear on what output you want...

Please tell me what should be the total value for below case:

Discount: 5
price: 200
Amount: 20

The total value should be 2000.
my calculate is wrong since the beginning:

Code:

sinTotal = (sinPrice * intNumber) * sinDiscount

but if use your formula,it still not correct:

Code:

sinTotal = (sinPrice - sinDiscount) * intNumber

for example:

Code:

sinPrice = 100    200      300
sinDiscount = 9           5         8.5
intNumber = 10           10       10

the correct result is sinTotal = 900 1000 255
use your formula the sinTotal = 910 1950 2915
only price can be discounted,i can't find out how to coding the total formula after discount in VB.i only need a formula to calculate the total value after discount,and the discount is a textbox wait for user to input numbers,it changes.