Public Class TicketOption
Private _optionName As OptionType
Public Enum OptionType
Ski = 2
Golf = 4
Business = 7
End Enum
Public Property OptionName() As OptionType
Get
Return _optionName
End Get
Set(ByVal value As OptionType)
_optionName = value
End Set
End Property
End Class
|