looping past index limit

[DebbieInFlorida]

Hey Kids,

THis is a little strange, but probably simple. I am doing a standard loop, but it keeps going past the limit...

Dim FlowRaster(1 To 12) As IRaster
For i = 1 To 12
do some **** here
Next i

i keeps trying to process a 13th entry???? Any ideas?
The reason I set the lower bound index to 1 instead of the usual 0, is just for easier interpretation, these are months.

Thanks

[Cimperiali]

You sure you do not change value of "i" inside the for next?
To be sure:
before next statement, write:
debug.print "i= " & i
and look at values.
it should start with 1 and end with 12
(of course, after the next statement -exiting the next - it should be = 13)

[DebbieInFlorida]

Hey Cimp

no I don't change anything, and I have checked, the value definetly changes to 13 inside the loop. here is all my code


Dim FlowRaster(1 To 12) As IRaster
For i = 1 To 12
Set FlowRaster(i) = SWFFunctions.SetFlows(pRaster3, "Flow_Rcl", i, outputpath)
Next i


Just a little strange, huh?????

[gjs368]

no I don't change anything, and I have checked, the value definetly changes to 13 inside the loop.

I assume because you say this, that after the loop completes, the value of i is 14?

[Heulsay]

How many times to you loop really ? The only reason i see it may be doing this is that i is passed by reference to SWFFunctions.SetFlows and SetFlows increment your value of i and return the new value.

if you can change the definition of SetFlow be sure to set ByVal for the i parameter.

If that cannot be done, use another var to pass the i value to SetFlows.

[Cimperiali]

Set FlowRaster(i) = SWFFunctions.SetFlows(pRaster3, "Flow_Rcl", i, outputpath)

you sure i is not changed in setFlows (Heulsay probably got the matter...) ?
you could code also

Dim FlowRaster(1 To 12) As IRaster
dim tmpCounter as integer
For i = 1 To 12
   tmpCounter=i
   Set FlowRaster(i) = SWFFunctions.SetFlows(pRaster3, "Flow_Rcl", tmpCounter, outputpath)
Next i

if you cannot change the byref of the method...

[DebbieInFlorida]

Cimper,
You are the man, I foolishly was using i in another loop in the called function, so that was superseding my passed i. I must expand my alphabet.
Thanks

[Cimperiali]

...LOL...It was not a race, but in any case Heulsay said it as first (byref variable, is not it?)
("give Caesar what is of Caesar"... )