HELP with For Next...

[miggy3ce]

Okay, so I have to create program that adds the whole numbers from 1 to 1000 and displays the sum in the label. Create a variation of this program that allows the user to specify any starting whole number and any ending whole number (10,000 or lower) and then adds all the whole numbers in that range. Allow for the possibility that a user may start with a high number and end with a low number. Format the label so that commas are displayed and there are no decimal places showing. I need help with the codes.

So far I'v come up with this

For i = 1 to 1000

Next

[dglienna]

So, what's the problem. That looks OK to me.

If you run into other problems, post them, and we'll help.

[Erik Wiggins]

Public Function AddRange(ByVal LowNum As Long, ByVal HighNum As Long)as Long
dim Result as Long
Result = 0
For i as integer = LowNum to HighNum
Result += i
Next i
AddRange=Result
End Function

[dglienna]

Quote your post, and then MINE:

Public Function AddRange(ByVal LowNum As Long, ByVal HighNum As Long)as Long
  dim Result as Long
  Result = 0
  For i as integer = LowNum to HighNum
     Result += i
  Next i
  AddRange=Result
End Function

[dglienna]

Either you have to check BEFORE you call that sub, or FIRST THING inside of it.

What if Low>High? Switch them...

If you can't grasp these simple concepts, you should go back to the books

[GremlinSA]

Right ... So far that is correct...

Allow for the possibility that a user may start with a high number and end with a low number.

Hint for this...

If LowNum > HighNum Then


End If