「VB.NET」Select Case文でEnum型の値を判定
書式
1.列挙型の定義
Public Enum 列挙名
定数1 値1
定数2 値2
xxx
End Enum
2.Select Case 表現式の値
Case 値1
処理コード
使用例
'列挙型enumOpの定義 Public Enum enumOP ADD MOV MODIFY End Enum Module ModuleTest Sub Main() '列挙型変数名ecの宣言 Dim ec As enumOP ec = enumOP.MOV 'Select Case文 Select Case ec 'enumOP.ADDの場合 Case enumOP.ADD Console.WriteLine("ユーザを登録 111") 'enumOP.MOVの場合 Case enumOP.MOV Console.WriteLine("ユーザを移動 222") 'enumOP.MODIFYの場合 Case enumOP.MODIFY Console.WriteLine("ユーザを修正 333") End Select Console.ReadKey() End Sub End Module
結果
ユーザを移動 222