「VB.NET」Select Caseで列挙型(enum)の値を判定する
書式
Select Case 条件式
Case Enum名.定数名
使用例
Module Module1 '列挙型の定義 Public Enum OPTYPE CREATE = 0 '作成 UPDATE = 1 '更新 DELETE = 2 '削除 SEARCH = 3 '検索 End Enum Sub Main() Dim res As String = "message" Dim tt As Integer tt = 3 'Select Case処理 Select Case tt '列挙型の項目の判定 Case OPTYPE.CREATE res = "ユーザの作成 create操作" Case OPTYPE.UPDATE res = "ユーザの更新 update操作" Case OPTYPE.DELETE res = "ユーザの削除 delete操作" Case OPTYPE.SEARCH res = "ユーザーの検索 search操作" End Select Console.WriteLine(res) Console.ReadKey() End Sub End Module
結果
ユーザーの検索 search操作