How to Calculate Year from given decimal Year Values

Question

1.00/5 (1 vote)

See more:

I Have Three Textbox
One Year 1 another one Year 2 and other textbox total Year
I give the input Year 1 textbox value 2.3
and Year 2 textbox value 2.8 then
I need output is in total Year textbox 4.11
How to do this calculation any one suggest Me

Posted 20-Aug-14 4:02am

hebsiboy

Updated 20-Aug-14 4:31am

v5

Add a Solution

Comments

Pheonyx 20-Aug-14 10:04am

[Scrap that I miss read your question, you need to explain your addition and how you get your answer] Let me understand this, you simple mean you have two text boxes and you want to add their values together and put them in a third?
This is basic, you should be able to do this.

Richard Deeming 20-Aug-14 10:06am

Not that basic, if 2.3 + 2.8 = 4.11!

Pheonyx 20-Aug-14 10:09am

Haha, my bad, I think it was the way the question was written I read it and my head said they add up. Cheers for pointing that out. :-)

Richard Deeming 20-Aug-14 10:06am

Without knowing how you arrived at the magic number "4.11" given the two input numbers "2.3" and "2.8", there's no way anyone can help you.

hebsiboy 20-Aug-14 10:28am

This is year Calculation 2.3 is year one and 2.8 is year two i need sum of year that is 4.11

Richard Deeming 20-Aug-14 10:41am

But 2.3 + 2.8 is not equal to 4.11; it's 5.1.

hebsiboy 20-Aug-14 10:50am

yes that i know
i here I am calculating Year 12 Month is one Year
So i Need to Calculate 12 comes Add one Year

Example : 3.7 + 2.6 =6.1

Richard Deeming 20-Aug-14 10:57am

Nope, that still doesn't make any sense. 3.7 + 2.6 = 6.3, not 6.1.

You're not adding the numbers together, and you're not splitting the numbers on the period, adding the parts, and putting a period between them. Quite frankly, I can't see any logic to explain what you are doing.

You need to explain precisely what steps you're taking to get from your input numbers to your output number.

PhilLenoir 20-Aug-14 10:07am

Please provide a better explanation. What does 2.3, 2.8 and 4.11 mean? These are not normal expressions for months or years. It looks to me that that are adding 2+2 and 8+3 and using a period to separate the pair of numbers in each case? Help us to help you, use the Improve question option.

hebsiboy 20-Aug-14 10:23am

This is year Calculation 2.3 is year one and 2.8 is year two i need sum of year that is 4.11

hebsiboy 20-Aug-14 10:37am

I am Giving year and month
when i add this Values it is calculating 2.3 + 2.8 = 5.1
I need if 12 month then i need to plus (one year)
Example 2.5 + 2.9 = 5.2

[no name] 20-Aug-14 12:23pm

So you need to add the months and if the total is greater than 12, then you add the remainder to the years. I am not seeing the problem here. It's simple arithmetic.

3 solutions

Solution 1

Use double.TryParse[^] to convert teh textbox.Text value to a numeric value.
Add then together, and set the new text box Text property using ToString.

Posted 20-Aug-14 4:10am

OriginalGriff

Solution 2

If I understand your requirement correctly
Without any validation or declarations:

Pos = InStr(Textbox1.Text,".")
y1 = Val(left(Textbox1.Text, Pos - 1))
m1 = Val(mid(Textbox1.Text, Pos + 1))
Pos = InStr(Textbox2.Text,".")
y2 = Val(left(Textbox2.Text, Pos - 1))
m2 = Val(mid(Textbox2.Text, Pos + 1))

Textbox3.Text = (y1 + y2) & "." & (m1 + m2)

What happens if m1 + m2 is more than 12? If you want this turned into years/months, you could use integer dicision to get the div and mod and add the div to y1 and y2.

Posted 20-Aug-14 4:34am

PhilLenoir

v2

Add a Solution

Add your solution here

Treat my content as plain text, not as HTML

Preview 0

…

Existing Members

Sign in to your account

...or Join us

Download, Vote, Comment, Publish.

Your Email
Password
Forgot your password?

Your Email
This email is in use. Do you need your password?
Optional Password

I have read and agree to the Terms of Service and Privacy Policy
Please subscribe me to the CodeProject newsletters

When answering a question please:

Read the question carefully.
Understand that English isn't everyone's first language so be lenient of bad spelling and grammar.
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.
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.

This content, along with any associated source code and files, is licensed under The Code Project Open License (CPOL)

Mike Meinz · Accepted Answer · 2014-08-20T05:15:00

VB

Dim arr1() As String
Dim arr2() As String
Dim intY As Integer
Dim intM As Integer
' Remove extraneous spaces
TextBox1.Text = TextBox1.Text.Trim
' Ensure that there is a period
If Not TextBox1.Text.Contains(".") Then
    TextBox1.Text += "."
End If
' Remove extraneous spaces
TextBox2.Text = TextBox2.Text.Trim
' Ensure that there is a period
If Not TextBox2.Text.Contains(".") Then
    TextBox2.Text += "."
End If
' Split into elements of an array (Index 0=Years, Index 1=Months)
arr1 = TextBox1.Text.Split(CChar("."))
arr2 = TextBox2.Text.Split(CChar("."))
' Convert to Integers and sum the values
Try
    intY = CInt(arr1(0)) + CInt(arr2(0))
    intM = CInt(arr1(1)) + CInt(arr2(1))
Catch ex As Exception
    ' Integer conversion failed for one of the values
    MessageBox.Show("One of the inputs is not a numeric", "Error", _
           MessageBoxButtons.OK, MessageBoxIcon.Exclamation)
Finally
    ' If the months value is greater or equal to 12
    ' Adjust the months value and the year value
    If intM > 11 Then
        intY += intM \ 12
        intM -= (intM \ 12) * 12
    End If
    ' Assign the new computed value to the TextBox
    TextBox3.Text = Format(intY, "###") & "." & Format(intM, "##")
End Try