featuregroupinfo.vb

来自「C#语言制作asp.net网上商店的」· VB 代码 · 共 62 行

Namespace NetShopForge.Library.Feature
    Public Class FeatureGroupInfo

        Private _FeatureGroupID As Integer
        Private _FeatureGroupName As String
        Private _Description As String
        Private _IsValid As Boolean
        Private _ItemOrder As Integer
        Private _Grouptype As Boolean



        Public Property FeatureGroupID() As Integer
            Get
                Return _FeatureGroupID
            End Get
            Set(ByVal Value As Integer)
                _FeatureGroupID = Value
            End Set
        End Property
        Public Property FeatureGroupName() As String
            Get
                Return _FeatureGroupName
            End Get
            Set(ByVal Value As String)
                _FeatureGroupName = Value
            End Set
        End Property
        Public Property Description() As String
            Get
                Return _Description
            End Get
            Set(ByVal Value As String)
                _Description = Value
            End Set
        End Property
        Public Property IsValid() As Boolean
            Get
                Return _IsValid
            End Get
            Set(ByVal Value As Boolean)
                _IsValid = Value
            End Set
        End Property

        Public Property ItemOrder() As Integer
            Get
                Return _ItemOrder
            End Get
            Set(ByVal Value As Integer)
                _ItemOrder = Value
            End Set
        End Property



        Public Sub New()
            _FeatureGroupName = ""
            _Description = ""
        End Sub
    End Class
End Namespace