shippingexpressionsinfo.vb

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

Namespace NetShopForge.Library.Shipping

    <Serializable()> Public Class ShippingExpressionsInfo

        Private _shippingexpressionsid As Integer
        Private _expressionsdescription As String
        Private _expressions As String
        Private _visible As Boolean
        '''<summary>
        '''
        '''</summary>
        Public Property ShippingExpressionsID() As Integer
            Get
                Return _shippingexpressionsid
            End Get
            Set(ByVal Value As Integer)
                _shippingexpressionsid = Value
            End Set
        End Property
        '''<summary>
        '''
        '''</summary>
        Public Property ExpressionsDescription() As String
            Get
                Return _expressionsdescription
            End Get
            Set(ByVal Value As String)
                _expressionsdescription = Value
            End Set
        End Property
        '''<summary>
        '''
        '''</summary>
        Public Property Expressions() As String
            Get
                Return _expressions
            End Get
            Set(ByVal Value As String)
                _expressions = Value
            End Set
        End Property
        '''<summary>
        '''
        '''</summary>
        Public Property IsValid() As Boolean
            Get
                Return _visible
            End Get
            Set(ByVal Value As Boolean)
                _visible = Value
            End Set
        End Property
    End Class

End Namespace