⭐ 欢迎来到虫虫下载站! | 📦 资源下载 📁 资源专辑 ℹ️ 关于我们
⭐ 虫虫下载站

📄 specialofferproductsinfo.vb

📁 C#语言制作asp.net网上商店的
💻 VB
字号:
Namespace NetShopForge.Library.SpecialOffer

    <System.Serializable()> Public Class SpecialOfferProductsInfo
        Private _id As Integer
        Private _offerid As Integer
        Private _productid As Integer
        Private _categoryid As Integer
        Private _type As String
        Private _type2 As Integer
        Private _quantity As Integer
        Private _ProductName As String
        Private _CategoryName As String

        Public Sub New(ByVal offerID As Integer, ByVal productID As Integer, ByVal categoryID As Integer, ByVal type As String, ByVal type2 As Integer, ByVal quantity As Integer)
            _offerid = offerID
            _productid = productID
            _categoryid = categoryID
            _type = type
            _quantity = Quantity
            _ProductName = ""
            _CategoryName = ""
            _type2 = type2
        End Sub
        Public Sub New()

        End Sub


        ''' <summary>
        ''' 
        ''' </summary>
        Public Property ID() As Integer
            Get
                Return _id
            End Get
            Set(ByVal Value As Integer)
                _id = Value
            End Set
        End Property
        ''' <summary>
        ''' 
        ''' </summary>
        Public Property OfferID() As Integer
            Get
                Return _offerid
            End Get
            Set(ByVal Value As Integer)
                _offerid = Value
            End Set
        End Property
        ''' <summary>
        ''' 
        ''' </summary>
        Public Property ProductID() As Integer
            Get
                Return _productid
            End Get
            Set(ByVal Value As Integer)
                _productid = Value
            End Set
        End Property
        ''' <summary>
        ''' 
        ''' </summary>
        Public Property CategoryID() As Integer
            Get
                Return _categoryid
            End Get
            Set(ByVal Value As Integer)
                _categoryid = Value
            End Set
        End Property
        ''' <summary>
        ''' 
        ''' </summary>
        Public Property Type() As String
            Get
                Return _type
            End Get
            Set(ByVal Value As String)
                _type = Value
            End Set
        End Property
        ''' <summary>
        ''' 
        ''' </summary>
        Public Property Quantity() As Integer
            Get
                Return _quantity
            End Get
            Set(ByVal Value As Integer)
                _quantity = Value
            End Set
        End Property


        Public Property ProductName() As String
            Get
                Return _ProductName
            End Get
            Set(ByVal Value As String)
                _ProductName = Value
            End Set
        End Property

        Public Property CategoryName() As String
            Get
                Return _CategoryName
            End Get
            Set(ByVal Value As String)
                _CategoryName = Value
            End Set
        End Property


        Public Property Type2() As Integer
            Get
                Return _type2
            End Get
            Set(ByVal value As Integer)
                _type2 = value
            End Set
        End Property


    End Class



End Namespace

⌨️ 快捷键说明

复制代码 Ctrl + C
搜索代码 Ctrl + F
全屏模式 F11
切换主题 Ctrl + Shift + D
显示快捷键 ?
增大字号 Ctrl + =
减小字号 Ctrl + -