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

📄 newscategoryinfo.vb

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

    Public Class NewsCategoryInfo

        Private _Newscategoryid As Integer
        Private _name As String
        Private _description As String
        Private _isvalid As Boolean
        Private _issubscription As Boolean
        Private _issiteNews As Boolean
        ''' <summary>
        ''' 
        ''' </summary>
        Public Property NewsCategoryID() As Integer
            Get
                Return _Newscategoryid
            End Get
            Set(ByVal Value As Integer)
                _Newscategoryid = Value
            End Set
        End Property
        ''' <summary>
        ''' 
        ''' </summary>
        Public Property Name() As String
            Get
                Return _name
            End Get
            Set(ByVal Value As String)
                _name = value
            End Set
        End Property
        ''' <summary>
        ''' 
        ''' </summary>
        Public Property Description() As String
            Get
                Return _description
            End Get
            Set(ByVal Value As String)
                _description = value
            End Set
        End Property
        ''' <summary>
        ''' 
        ''' </summary>
        Public Property IsValid() As Boolean
            Get
                Return _isvalid
            End Get
            Set(ByVal Value As Boolean)
                _isvalid = value
            End Set
        End Property
        ''' <summary>
        ''' 
        ''' </summary>
        Public Property IsSubscription() As Boolean
            Get
                Return _issubscription
            End Get
            Set(ByVal Value As Boolean)
                _issubscription = value
            End Set
        End Property
        ''' <summary>
        ''' 
        ''' </summary>
        Public Property IsSiteNews() As Boolean
            Get
                Return _issiteNews
            End Get
            Set(ByVal Value As Boolean)
                _issiteNews = value
            End Set
        End Property

    End Class

End Namespace

⌨️ 快捷键说明

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