speedbarinfo.vb

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

Namespace NetShopForge.Library.SpeedBar

    <Serializable()> Public Class SpeedBarInfo

        Private _barid As Integer
        Private _Title As String
        Private _url As String
        Private _tooltip As String
        Private _isvalid As Boolean
        Private _itemorder As Integer
        Private _css As String

        Public Property BarID() As Integer
            Get
                Return _barid
            End Get
            Set(ByVal Value As Integer)
                _barid = Value
            End Set
        End Property

        Public Property Title() As String
            Get
                Return _Title
            End Get
            Set(ByVal Value As String)
                _Title = Value
            End Set
        End Property

        Public Property URL() As String
            Get
                Return _url
            End Get
            Set(ByVal Value As String)
                _url = Value
            End Set
        End Property

        Public Property ToolTip() As String
            Get
                Return _tooltip
            End Get
            Set(ByVal Value As String)
                _tooltip = Value
            End Set
        End Property

        Public Property IsValid() As Boolean
            Get
                Return _isvalid
            End Get
            Set(ByVal Value As Boolean)
                _isvalid = Value
            End Set
        End Property

        Public Property ItemOrder() As Integer
            Get
                Return _itemorder
            End Get
            Set(ByVal Value As Integer)
                _itemorder = Value
            End Set
        End Property

        Public Property CSS() As String
            Get
                Return _css
            End Get
            Set(ByVal Value As String)
                _css = Value
            End Set
        End Property

    End Class
End Namespace