Imports System
Public Module Module1
Public Enum TestEnum
First
Second
Third
End Enum
Public Sub Main()
Dim value As TestEnum = Nothing
Console.WriteLine(CType(value, TestEnum))
End Sub
End Module