Case var1 of
Value1: statement1;
Range1:statement2;
Value2,value3,value4:statement3;
�c
End;


=========================================================================================================

Case var1 of
Value1: statement1;
Range1:statement2;
Value2,value3,value4:statement3;
�c
Else
Statement4;
Statement5;
�c
End;


=========================================================================================================


Notes : var1 must be an ordinary type variable.