La ayuda lo explica facilmente. La sintaxis es:
DO CASE
CASE opcion1
**** codigo
CASE opcion2
***COdigo
OTHERWISE
***codigo
ENDCASE
Ejemplo. Imaginate que tienes un textbox que lea un caracter (Estado civil por ejemplo)
DO CASE
CASE Thisform.txtEstadoCivil.value = "C"
wait window "Casado"
CASE Thisform.txtEstadoCivil.value = "S"
wait window "Soltero y Feliz"
CASE Thisform.txtEstadoCivil.value = "V"
wait window "Viudo"
OTHERWISE &&Esta opcion no siempre se usa
wait window "No especifico"
ENDCASE
