SELECT CASE...CASE...END SELECT

SELECT CASE variabile
 CASE variabile(1)
 <<vostro codice 1>>
 CASE variabile(2)
 <<vostro codice 2>>
 CASE variabile(3)
 <<vostro codice 3>>
 CASE ELSE oppure DEFAULT
 <<vostro codice 4>>
END SELECT 

Esegue del codice previa verifica della condizione

---

Spiegazione

Ogni valore che assume variabile esegue il codice successivo alla verifica. Questa funzione è simile a If..Then..Else con la differenza che è più immediata e pulita la lettura del codice. Inoltre è possibile gestire il flusso di dati in modo che in caso non sia soddisfatta nessuna condizione il sistema esegua qualche cosa, questo è possibile tramite CASE ELSE o DEFAULT.

Esempio 1 - Verifica pressione di un tasto

SELECT CASE key.Code
 CASE key.Escape
 Message.Info("premuto il tasto ESC")
 CASE key.F1
 Message.Info("premuto il tasto F1")
 DEFAULT 
 Message.Info("tasto non riconosciuto")
END SELECT 

Spiegazione

Ad ogni pressione di un tasto il sistema verifica a quale codice della tastiera corrisponde e si comporta di conseguenza. Per provare l'esempio è sufficiente scrivere il codice sopra riportato all'interno di una TextBox.