ordernoteinfo.vb

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

Namespace NetShopForge.Library.Order

    Public Class OrderNoteInfo
        Private _noteid As Integer
        Private _orderid As Integer
        Private _note As String
        Private _orderstatus As OrderStatus
        Private _date As DateTime
        Private _action As OrderAction

        Public Property NoteID() As Integer
            Get
                Return _noteid
            End Get
            Set(ByVal Value As Integer)
                _noteid = value
            End Set
        End Property
      
        Public Property OrderID() As Integer
            Get
                Return _orderid
            End Get
            Set(ByVal Value As Integer)
                _orderid = value
            End Set
        End Property
     
        Public Property Note() As String
            Get
                Return _note
            End Get
            Set(ByVal Value As String)
                _note = value
            End Set
        End Property

        Public Property OrderStatus() As OrderStatus
            Get
                Return _orderstatus
            End Get
            Set(ByVal Value As OrderStatus)
                _orderstatus = Value
            End Set
        End Property
 
        Public Property NoteDate() As DateTime
            Get
                Return _date
            End Get
            Set(ByVal Value As DateTime)
                _date = value
            End Set
        End Property
    
        Public Property Action() As OrderAction
            Get
                Return _action
            End Get
            Set(ByVal Value As OrderAction)
                _action = Value
            End Set
        End Property
    End Class

End Namespace