LOL
I have never come across such a case statement:)
That is a a scarey bit of code.

The VB.Net case statement will not test expressions, so .net net I find myself having to do

If .......... Then

elseif

................

elseif
...................


end if


To my eyes this is ugly compared to the VFP case statement.
I find the VFP CASE staement very flexible and easy to read unless I get too sloppy and do something
as dumb as this.

CASE ThisTrue and ThatTrue but not if ThatOtherFalse
........
CASE ThatOtherFalse OR ThisTrue and ThatTrue
........
ENDCASE
etc




>>I am definitely not a fan of a sequence of DO CASE statements that are deliberately coded to "do work" (in the conditions themselves) and to ALL run in the sequence coded. To me that 'style' is a pure corruption of the intention of DO CASE.
>
>Hmmm ... one of "favorite" constructs is:
>
>

>DO CASE
>CASE !SEEK( ... )
>   ...
>CASE !RLOCK()
>   ...
>CASE DELETED()
>   ...
>OTHERWISE
>   ...
>ENDCASE
>