DevX Home Today's Headlines   Articles Archive   Tip Bank   Forums

# Thread: Drop lowest value from Array and Resize array - VB 2003

1. Registered User
Join Date
Aug 2006
Location
Albuquerque
Posts
32

## Drop lowest value from Array and Resize array - VB 2003

Hey Everyone!
My goal is to to reaverage the grades after the lowest has been dropped. I am working with a five element array. I would like to find the lowest value in the array and remove it from the array then resize the array with the elements that remain.
Since I have sorted the array, I know that I would like to remove the first element in the array since it is the lowest. Below is the code that I have tried but cannot get it to work.

Thanks for your help!
Julian

Sub theArray()
For i As Integer = 1 To 5
Console.WriteLine("Enter grade: " & i)
grades(i) = Console.ReadLine
sum = grades(i) + sum
Next
Array.Sort(grades)
average = sum / UBound(grades)
End Sub
' i was using this code to replace the first element with nothing
'then reaverage the grade with only 4 grades instead of five

Sub DropLowest()
grades(1) = Nothing
newAverage = sum / UBound(grades) - 1
End Sub

2. Registered User
Join Date
Dec 2004
Posts
163
Julian,

Is this a homework assignment?

Kerry Moorman

3. This looks like something I did when I was learning to program! ;-)

What are you getting for the value @ DropLowest()?

4. Senior Member
Join Date
Nov 2003
Location
Portland, OR
Posts
8,387
Why not simply subtract the value of the lowest grade from sum, then divide sum / (UBound(grades) - 1) ?

5. Registered User
Join Date
Aug 2006
Location
Albuquerque
Posts
32
Thanks for the replies. Yes it is for an assignment for one of my classes. It was added in to the assignment, if we wanted to do it. The value i get from the dropLowest() is not what i get when i manually add the 4 grades and divide by 4.

Thanks Phil I will try that approach!!

#### Posting Permissions

• You may not post new threads
• You may not post replies
• You may not post attachments
• You may not edit your posts
•

 FAQ Latest Articles Java .NET XML Database Enterprise
 Questions? Contact us. C++ Web Development Wireless Latest Tips Open Source

×
By using this site, you agree to the Privacy Policy