Přepínač SELECT CASE

Místo konstrukce s mnoha větvemi ENDIF lze použít příkaz

$$\begin{eqnarray*} &&\mbox{{\tt SELECT CASE (} {\it výraz} {\tt )}} \\ &&\mbox{~... ...x{~~~~{\it poslední\_blok\_příkazů}} \\ &&\mbox{\tt END SELECT} \end{eqnarray*}$$

Volba DEFAULT je nepovinná. Blok pod zápisem CASE(2,4:7) se provede pro hodnoty 2, 4, 5, 6 a 7. Obdobně jako u pascalského příkazu CASE se po provedení příslušného bloku příkazů skončí. (Narozdíl od přepínače SWITCH z jazyka C, kde se k dosažení stejného efektu musí za každý blok připojit ještě příkaz BREAK.)