Question

How to use enum with select case in VB.NET

Answer 1

Imports System

Enum EN
    A = 0
    B = 1
    C = 2
    D = 3
End Enum


Public Class Test
    Public Shared Sub Main()
         Dim n As EN = EN.B

         Select Case n
            Case EN.A
                Console.WriteLine(EN.A)
            Case EN.B
                Console.WriteLine(EN.B)
            Case EN.C
                Console.WriteLine(EN.C)
        End Select
    End Sub
End Class



' run:
' 
' 1
'

 

70+ SQL courses for beginners and professionals