04-24-2012, 04:30 PM
|
 |
Senior Contributor
Forum Leader
* Expert *
|
|
Join Date: Apr 2005
Location: USA
Posts: 866
|
|
Here is a console program:
Code:
Module Module1
Sub Main()
Dim varBaseDiscount As Decimal
Dim varBase As Decimal
Dim varDiscountRate As Decimal
Dim varBaseDiscounted As Decimal
Dim varDollies As Decimal
Dim varDolliesDiscounted As Decimal
varBase = 55D
varDiscountRate = 0.1D
varBaseDiscount = varBase * varDiscountRate
Console.WriteLine("varBaseDiscount = {0}", varBaseDiscount)
varBase = 55D
varBaseDiscount = 5.5D
varBaseDiscounted = varBase - varBaseDiscount
Console.WriteLine("varBaseDiscounted = {0}", varBaseDiscounted)
varDollies = 80D
varBaseDiscount = 5.5D
varDolliesDiscounted = varDollies - varBaseDiscount
Console.WriteLine("varDolliesDiscounted = {0}", varDolliesDiscounted)
Console.ReadLine()
End Sub
End Module
Here is the output:
Code:
varBaseDiscount = 5.5
varBaseDiscounted = 49.5
varDolliesDiscounted = 74.5
This is called a sanity check. A little program to demonstrate that the computer can indeed subtract properly. Once this is confirmed, you need to find the important difference between your program and the sanity check that is causing them to behave differently.
Do you have Option Explicit On and Option Strict On? |
__________________
C# _VB.NET _
|
Wierd one. Subtraction does not work.
Linear Mode
