Click here to Skip to main content
14,637,446 members

Textbox not calculating correctly

Member 8365433 asked:

Open original thread
I seem to have a small bug somehow but for the life of me I cannot fix it, I have a small routine that adds some numbers from Textbox inputs, this works fine until the maths reaches 999.99 then it goes back to 1.00, I have tried different formats but to no avail, my code is.
Public Sub DisplayTotalBalance()
       Dim AddTotalReceipts As Double = 123456.123
       Dim MinusTotalPayments As Double = 123456.123
       Dim GetTotalBalance As Double = 123456.123

       AddTotalReceipts = CDbl(Val(txtTotalReceipts.Text)).ToString("###,###.00")
       MinusTotalPayments = CDbl(Val(txtTotalPayments.Text)).ToString("###,###.00")

  GetTotalBalance = AddTotalReceipts.ToString("###,###.00") - MinusTotalPayments.ToString("###,###.00")
       txtBalance.Text = GetTotalBalance.ToString("###,###.00")

          End Sub

Any idea what i am doing wrong or why it will not add more than 999.99 would be greatly appreciated.
Tags: VB, VB.NET

Preview



When answering a question please:
  1. Read the question carefully.
  2. Understand that English isn't everyone's first language so be lenient of bad spelling and grammar.
  3. If a question is poorly phrased then either ask for clarification, ignore it, or edit the question and fix the problem. Insults are not welcome.
  4. Don't tell someone to read the manual. Chances are they have and don't get it. Provide an answer or move on to the next question.
Let's work to help developers, not make them feel stupid.
Please note that all posts will be submitted under the The Code Project Open License (CPOL).




CodeProject, 503-250 Ferrand Drive Toronto Ontario, M3C 3G8 Canada +1 416-849-8900 x 100