選択時に列挙を使用する

Question

Enum age 

Over18 

Under18 

End enum 


Select case age 

End select 

'年齢'は型であり、式として使用できません。

"select case"でenumを使用する方法はありますか？

Answer 1

これは意味をなさない。しかし、変数のSelect Caseを行うことができます。そのタイプはの列挙型です。

Dim customerAge As age 
customerAge = age.Over18 

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

Answer 2

私はそうは思わないでしょう。 Select Caseは特別なIf Then文であるため、selectには答えを比較するためのものが必要です。したがって

Select childsAge 
Case age.Over18 

Answer 3

enum「年齢」は実際にはタイプです。あなたはそのようにそれを保持し、それをテストするために構築された変数に代入する必要があります。

Enum age 
    over18 
    under18 
End enum 


user.age = age.over18 

Select case user.age 

End Select 

Answer 4

あなたが列挙型を使用する変数を定義する必要があります。

 

    dim myage as age 
    myage = age.Over18 

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

Answer 5

あなたが式にタイプ（年齢）を使用することはできませんが、年齢

のSelect Case myAge ケースage.Over18として

薄暗いmyAgeそのタイプのすべての変数を使用することができます...