How to use Enums in VB.Net

salty.vb

Imports System

Public Enum flavorEnum
  salty
  sweet
  sour
  bitter
End Enum 
				
Public Module Module1
	Public Sub Main()
		Dim isEqual As Boolean = False
		Dim flavors As String() = {"salty","sweet","sour","bitter"}
		Dim index As Integer
		
		Console.WriteLine("The strings in the flavorEnum are:")
	  	Dim i As String 
	  	For Each i In [Enum].GetNames(GetType(flavorEnum))
			Console.WriteLine(String.Format("{0} equals {1}: {2}", i, flavors(index), i = flavors(index)))
			'Console.WriteLine(i)
			index = index + 1
	  Next
	End Sub
End Module