Inadvertent looping!

You can also do this, it does the same thing, but is a little easier to read:

Code:

---

Select Case ave(row)
    Case Is >= 90
        grade(row) = "A"
    Case 80 To 89
        grade(row) = "B"
    Case 70 To 79
        grade(row) = "C"
    Case 60 To 69
        grade(row) = "D"
    Case Else
        grade(row) = "F"
End Select

---

Quote:

---

Originally Posted by Comintern

You can also do this, it does the same thing, but is a little easier to read:
<snip>

---

Almost the same thing, but it has a problem. If their average score is between 59 and 60 (or 69 and 70, or 79 and 80, or 89 and 90), they are marked as having an 'F'. Since only the first case to be True is used, you can do:

Code:

---

Select Case ave(row)
    Case Is >= 90
        grade(row) = "A"
    Case Is >= 80
        grade(row) = "B"
    Case Is >= 70
        grade(row) = "C"
    Case Is >= 60
        grade(row) = "D"
    Case Else
        grade(row) = "F"
End Select

---

Now, if they have, say, a 69.5 average, they get marked as having a 'D' instead of an 'F'.

You could keep the If statement and just make it so it's like:

Code:

---

ave(row) >= 80 And ave(row) < 90

---

And it would work fine.

Though I realized I made the same mistake in my code in my first post in this thread (did > and not >=). Here it is fixed:

Code:

---

If (ave(row) >= 90 And ave(row) <= 100) Then
    grade(row) = "A"
ElseIf (ave(row) >= 80 And ave(row) < 90) Then
    grade(row) = "B"
ElseIf (ave(row) >= 70 And ave(row) < 80) Then
    grade(row) = "C"
ElseIf (ave(row) >= 60 And ave(row) < 70) Then
    grade(row) = "D"
Else
    grade(row) = "F"
End If

---

Quote:

---

Originally Posted by ChaosTheEternal

Almost the same thing, but it has a problem. If their average score is between 59 and 60 (or 69 and 70, or 79 and 80, or 89 and 90), they are marked as having an 'F'.

---

Nice catch -- I missed the average being a float.