Calculate sum of currency textbox values

Hi Experts,

I need help on what is probably a very basic question for someone that knows what they are doing.

Windows Application, VB.net 2005, SQL Server 2005.

TextBoxA = Currency value
TextBoxB = Currency value
TextBoxC = Currency Value
TextBoxD = Currency Value
(Values can be Null)

TextBoxE = Sum of the values above

Dave

Who is Participating?

Commented:
Dim a(4) As Decimal
Dim Result As Decimal
a(0) = System.Convert.ToDecimal(Val(TextBoxA.Text.Replace("\$", "")))
a(1) = System.Convert.ToDecimal(Val(TextBoxB.Text.Replace("\$", "")))
a(2) = System.Convert.ToDecimal(Val(TextBoxC.Text.Replace("\$", "")))
a(3) = System.Convert.ToDecimal(Val(TextBoxD.Text.Replace("\$", "")))

Result = a(0) + a(1) + a(2) + a(3)
TextBoxE.Text = Format(Result, "\$0.00")
0

Commented:
Hi

The following code does exactly what you explained (according to how I understood it):

Dim a(4) As Decimal
Dim Result As Decimal
a(0) = System.Convert.ToDecimal(Val(TextBoxA.Text))
a(1) = System.Convert.ToDecimal(Val(TextBoxB.Text))
a(2) = System.Convert.ToDecimal(Val(TextBoxC.Text))
a(3) = System.Convert.ToDecimal(Val(TextBoxD.Text))

Result = a(0) + a(1) + a(2) + a(3)
TextBoxE.Text = Result.ToString
0

Author Commented:
Hi,

Thanks for the response.
I used the code on a buttonClick event...

I can't get the code to work, maybe I wasn't clear on my post.

Using the ButtonClick event, TextBoxes A,B,C,&D show their individual values in TextBoxE but the sum of the TextBoxes are not calculated.

0

Commented:
Can you describe whats the output of the button event more, like give me an example of whats happening and the correct values you want
0

Author Commented:
HI,

Let's try this:

All TextBox Null values are \$0.00
Properties are set to Currency.

I enter these amounts:
TextBoxA = \$10.00
TextBoxB = \$10.00
TextBoxC = \$10.00
TextBoxD = \$0.00

After buttonClick event:
TextBoxE changes from \$0.00 to 0 (Should be = \$30.00)

I hope this helps.

0

Commented:
TextBoxE.Text = (decimal.Parse(TextBoxA.Text)+decimal.Parse(TextBoxB.Text)+decimal.Parse(TextBoxC.Text)+decimal.Parse(TextBoxD.Text)).ToString

0

Author Commented:

iHadi, the code worked great! thank you very much.

pradeepsudharsan, i'm sorry but I got an error message with your code:
"The input string was not in the correct format."

0

Author Commented:
0
Question has a verified solution.

Are you are experiencing a similar issue? Get a personalized answer when you ask a related question.

Have a better answer? Share it in a comment.