Imports System
Enum PLang
C
VBNET
CPP
Java
End Enum
Public Module Module1
Public Sub Main()
Dim str As String = "VBNET"
Dim type As PLang = [Enum].Parse(GetType(PLang), str)
If type = PLang.VBNET Then
Console.WriteLine("VBNET")
End If
End Sub
End Module
' run:
'
' VBNET
'