Utilizzo dell'enumerazione in Seleziona caso

Question

Enum age

 Over18

 Under18

End enum


Select case age

End select

'age' è un tipo e non può essere usato come espressione.

Esiste un modo di usare enum in " select case " ;?

Answer 1

Non ha senso. Ma puoi fare un caso Select su una variabile che ha l'enum come tipo .

Dim customerAge As age
customerAge = age.Over18

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

Answer 2

Dovrai definire una variabile che usa l'enum.

   dim myage as age
    myage = age.Over18

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

Answer 3

L'enum "età" è davvero un tipo. Devi assegnarlo a una variabile creata per tenerlo e testarlo in questo modo:

Enum age
  over18
  under18
End enum


user.age = age.over18

Select case user.age

End Select

Answer 4

Non credo. Il caso Select è solo un'istruzione If Then speciale, quindi la selezione deve avere qualcosa a cui confrontare la risposta. Quindi

Select childsAge
Case age.Over18

Answer 5

non puoi usare il tipo (age) sull'espressione, ma puoi usare qualsiasi variabile di quel tipo

Dim myAge As age

Seleziona Case myAge   Età del caso Over18 ...