productfeatureinfo.vb

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

Imports Microsoft.VisualBasic
Namespace NetShopForge.Library.Product


    Public Class ProductFeatureInfo

        ' Private _productID As Integer
        Private _featureName As String
        Private _featureValue As String


        Sub New(ByVal featureName, ByVal featureValue)
            '_productID = productID
            _featureName = featureName
            _featureValue = featureValue
        End Sub


        'Public Property ProductID() As Integer
        '    Get
        '        Return _productid
        '    End Get
        '    Set(ByVal Value As Integer)
        '        _productid = Value
        '    End Set
        'End Property

        Public Property FeatureName() As String
            Get
                Return _featureName
            End Get
            Set(ByVal Value As String)
                _featureName = Value
            End Set
        End Property


        Public Property FeatureValue() As String
            Get
                Return _featureValue
            End Get
            Set(ByVal Value As String)
                _featureValue = Value
            End Set
        End Property

    End Class
End Namespace