Usando enumeração em Select caso
-
05-07-2019 - |
Pergunta
Enum age
Over18
Under18
End enum
Select case age
End select
'idade' é um tipo e não pode ser usado como uma expressão.
Existe alguma maneira de usar enums em "Select Case"?
Solução
Isso não faz sentido. Mas você pode fazer um Select Case em um variável que tem o enum como seu tipo .
Dim customerAge As age
customerAge = age.Over18
Select Case customerAge
Case age.Over18
...
Case age.Under18
...
End Select
Outras dicas
Você terá que definir uma variável que usa o enum.
dim myage as age
myage = age.Over18
Select Case myage
case age.Over18
.....
case age.Under18
.....
end select
O enum "idade" é realmente um tipo. Você precisa atribuir a uma variável construída para prendê-lo e testá-lo dessa forma:
Enum age
over18
under18
End enum
user.age = age.over18
Select case user.age
End Select
Eu não penso assim. O Select Case é apenas um especial Se Então instrução para que a seleccionar tem de ter algo para comparar a resposta. Então
Select childsAge
Case age.Over18
Você não pode usar o tipo (idade) sobre a expressão, mas você pode usar qualquer variável desse tipo
Dim myAge Como idade
Select Case myAge Caso age.Over18 ...