Solved

Calculate sum of currency textbox values

Posted on 2006-06-24
8
688 Views
Last Modified: 2008-01-09
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

Thanks in advance for your help.

Dave

0
Comment
Question by:dave_sky
  • 4
  • 3
8 Comments
 
LVL 13

Expert Comment

by:iHadi
ID: 16976732
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 Comment

by:dave_sky
ID: 16976833
Hi,

Thanks for the response.
I used the code on a buttonClick event...
Tried the from load...
 
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
 
LVL 13

Expert Comment

by:iHadi
ID: 16976934
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
NAS Cloud Backup Strategies

This article explains backup scenarios when using network storage. We review the so-called “3-2-1 strategy” and summarize the methods you can use to send NAS data to the cloud

 

Author Comment

by:dave_sky
ID: 16977347
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
 
LVL 7

Expert Comment

by:pradeepsudharsan
ID: 16977415
       TextBoxE.Text = (decimal.Parse(TextBoxA.Text)+decimal.Parse(TextBoxB.Text)+decimal.Parse(TextBoxC.Text)+decimal.Parse(TextBoxD.Text)).ToString


0
 
LVL 13

Accepted Solution

by:
iHadi earned 500 total points
ID: 16977860
       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
 

Author Comment

by:dave_sky
ID: 16978407

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 Comment

by:dave_sky
ID: 16979003
0

Featured Post

Windows Server 2016: All you need to know

Learn about Hyper-V features that increase functionality and usability of Microsoft Windows Server 2016. Also, throughout this eBook, you’ll find some basic PowerShell examples that will help you leverage the scripts in your environments!

Question has a verified solution.

If you are experiencing a similar issue, please ask a related question

Article by: Kraeven
Introduction Remote Share is a simple remote sharing tool, enabling you to see, add and remove remote or local shares. The application is written in VB.NET targeting the .NET framework 2.0. The source code and the compiled programs have been in…
It’s quite interesting for me as I worked with Excel using vb.net for some time. Here are some topics which I know want to share with others whom this might help. First of all if you are working with Excel then you need to Download the Following …
This tutorial gives a high-level tour of the interface of Marketo (a marketing automation tool to help businesses track and engage prospective customers and drive them to purchase). You will see the main areas including Marketing Activities, Design …
In a recent question (https://www.experts-exchange.com/questions/28997919/Pagination-in-Adobe-Acrobat.html) here at Experts Exchange, a member asked how to add page numbers to a PDF file using Adobe Acrobat XI Pro. This short video Micro Tutorial sh…

772 members asked questions and received personalized solutions in the past 7 days.

Join the community of 500,000 technology professionals and ask your questions.

Join & Ask a Question