在選擇案例中使用枚舉

Question

Enum age 

Over18 

Under18 

End enum 


Select case age 

End select 

'age'是一種類型，不能用作表達式。

有沒有在「select case」中使用枚舉的方法？

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 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

你不能使用的表達式類型（年齡），但您可以使用該類型的任何變量

昏暗myAge隨着年齡的

選擇案例myAge 案例age.Over18 ...