Mega Code Archive
Public Enum type
<![CDATA[
Imports System
Module HelloWorld
Public Enum CreditCard
Visa
MasterCard
AmericanExpress
Discover
End Enum
Public Sub Main()
Dim cc as CreditCard
cc = CreditCard.Visa
Console.WriteLine(cc)
End Sub
End Module
]]>