>in your current code check
>

>FOR lnCount = _screen.FormCount TO 1 STEP - 1
>      assert _screen.FormCount=m.lnCount
>      loForm = _screen.Forms[lnCount]
>...
>
>but to be more secure go
>
>Do while _screen.FormCount>0
>     loForm = _screen.Forms[_screen.FormCount]
>

>
>regards
>
>thomas
>
>with a couple of exit branches

Thanks a lot, I solved it with do while (George Tasker's idea) with a correction by Cetin Basoz. See my other thread on the topic (as usual, I can not keep just one thread when I have a problem :))

Thanks again.