Having difficulty with exiting a Do loop

I'm sure this is a rookie question but I rarely use the Do...While and Do...Until loops.

I have been abusing GoTo in the past and am trying to mend my ways.

I have a form that is shown from a calling sub. I want a loop in the calling sub to check for a boolean condition (set by a form property) and to exit the loop the instant that the condition is met. Instead the loop repeats at least once before picking up the condition change. Is there any way around this or do I need to go back to using GoTo?


(Reading the above makes me realise I'm not making myself very clear, I will post some dummy code below to express my idea more clearly)

Please Login or Register  to view this content.

It's not going to exit until it hits the loop at the bottom and goes back up to the head of the loop where it checks the condition.

If you don't want it to do the stuff between where the flag is set false and the bottom of the loop, you need to put it inside an If ... End If.

In structure programming, you would probably call one or more subroutines that executed the code so it would only be a few lines inside the If block.

Regards, TMS

Originally Posted by TMShucks

If you don't want it to do the stuff between where the flag is set false and the bottom of the loop, you need to put it inside an If ... End If.

Originally Posted by TMShucks

In structure programming, you would probably call one or more subroutines that executed the code so it would only be a few lines inside the If block.

That's what I was doing in the meantime but it just felt wrong.

Originally Posted by Bukovnik

The routine won't exit until it's completed the loop and checks the status of blnCloseForm.
To have it exit where you have identified you would need to check the status of blnCloseForm after it returns from the sub routine and use and Exit Do.

Of course! (slaps head). How could I overlook

Please Login or Register  to view this content.

? Anyway, thanks for solving. +1