Uso de la enumeración en casos seleccionados

Question

Enum age

 Over18

 Under18

End enum


Select case age

End select

'edad' es un tipo y no se puede usar como una expresión.

¿Hay alguna forma de usar enumeraciones en " select case " ;?

Answer 1

Eso no tiene sentido. Pero puede hacer un caso de selección en una variable que tiene la enumeración como su tipo .

Dim customerAge As age
customerAge = age.Over18

Select Case customerAge
    Case age.Over18
        ...
    Case age.Under18
        ...
End Select

Answer 2

Tendrá que definir una variable que use la enumeración.

   dim myage as age
    myage = age.Over18

    Select Case myage
    case age.Over18
    .....
    case age.Under18
    .....
    end select

Answer 3

La enumeración '' edad '' es de hecho un tipo. Debe asignarlo a una variable creada para mantenerlo y probarlo de esa manera:

Enum age
  over18
  under18
End enum


user.age = age.over18

Select case user.age

End Select

Answer 4

No lo creo. El caso Select es solo una declaración especial If Then, por lo que el select tiene que tener algo con lo que comparar la respuesta. Así que

Select childsAge
Case age.Over18

Answer 5

no puede usar el tipo (edad) en la expresión, pero puede usar cualquier variable de ese tipo

Dim myAge As age

Seleccionar caso myAge   Edad del caso. Más de 18 ...