Solved

Arithmetic operation resulted in an overflow.

Posted on 2014-02-28
7
370 Views
Last Modified: 2014-02-28
I am getting the error Arithmetic operation resulted in an overflow.

Function setthepercentage(ByVal thegoals As List(Of Integer), ByVal thename As String) As String

        Dim over05 As Integer = 0
        Dim over15 As Integer = 0
        Dim over25 As Integer = 0
        Dim countelements As Integer = 0
        'work out if it is 0.5 - 1,3,4,5,3,2,4,5,

        For Each element As String In thegoals
            'chekc if over 0.5
            countelements = countelements + 1
            If element > 0 Then
                over05 = over05 + 1
                'check if over 1.5
            ElseIf element > 1 Then
                over15 = over05 + 1
                'check if over 2.5
            ElseIf element > 2 Then
                over25 = over05 + 1
            End If

        Next

        over05 = (over05 / countelements) * 100
        If over05 <> "NaN" Then
            Session(thename & "over05") = over05
        End If
        over15 = (over15 / countelements) * 100

        If over15 <> "NaN" Then
            Session(thename & "over15") = over15
        End If

        over25 = (over25 / countelements) * 100

        If over25 <> "NaN" Then
            Session(thename & "over25") = over25
        End If
    End Function

Open in new window


What its supposed to do is set the percentage...  

so if elements number if greater then 0 i added 1 to the tally

 If element > 0 Then
   over05 = over05 + 1
end if

Open in new window

I also count how many times it goes through a loop so

        countelements = countelements + 1

Open in new window

this give me the numbers to work with so:

over05 = (over05 / countelements) * 100

Open in new window


but this gives me the error Arithmetic operation resulted in an overflow.
0
Comment
Question by:runnerjp2005
7 Comments
 
LVL 44

Expert Comment

by:AndyAinscow
ID: 39894375
Use Long instead of Integer as the data type
0
 

Author Comment

by:runnerjp2005
ID: 39894391
I seem to get the same error
0
 
LVL 44

Accepted Solution

by:
AndyAinscow earned 500 total points
ID: 39894396
I'd single step through your code (or use a pencil and paper and work through it).  There might be something wrong in the logic.
If it overruns a Long we are talking pretty BIG numbers.
0
How Do You Stack Up Against Your Peers?

With today’s modern enterprise so dependent on digital infrastructures, the impact of major incidents has increased dramatically. Grab the report now to gain insight into how your organization ranks against your peers and learn best-in-class strategies to resolve incidents.

 
LVL 52

Expert Comment

by:Carl Tawn
ID: 39894400
Can you post samples of some input values that cause the overflow?
0
 
LVL 83

Expert Comment

by:CodeCruiser
ID: 39894477
Could the problem be with following conditions?

If over05 <> "NaN" Then

Comment these out and see what happens.

If you still get an error, tell us on which line.
0
 

Author Closing Comment

by:runnerjp2005
ID: 39894596
Walked through it and found i had 0 0/0*0 cant be done :) thanks
0
 
LVL 40
ID: 39895731
It can be done, but by putting the result in a Double, which is able to record an infinite.
0

Featured Post

Free Tool: IP Lookup

Get more info about an IP address or domain name, such as organization, abuse contacts and geolocation.

One of a set of tools we are providing to everyone as a way of saying thank you for being a part of the community.

Question has a verified solution.

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

Today I had a very interesting conundrum that had to get solved quickly. Needless to say, it wasn't resolved quickly because when we needed it we were very rushed, but as soon as the conference call was over and I took a step back I saw the correct …
International Data Corporation (IDC) prognosticates that before the current the year gets over disbursing on IT framework products to be sent in cloud environs will be $37.1B.
The Email Laundry PDF encryption service allows companies to send confidential encrypted  emails to anybody. The PDF document can also contain attachments that are embedded in the encrypted PDF. The password is randomly generated by The Email Laundr…

808 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