Imports System
Public Class MainClass
Enum Temperatures
WickedCold = 0
FreezingPoint = 32
LightJacketWeather = 60
SwimmingWeather = 72
BoilingPoint = 212
End Enum 'Temperatures
Shared Sub Main(ByVal args As String())
Console.WriteLine("Freezing point of water: {0}",CInt(Temperatures.FreezingPoint))
Console.WriteLine("Boiling point of water: {0}", CInt(Temperatures.BoilingPoint))
End Sub
End Class
|