listitem.vb

来自「VB.NET的Web浏览器IE7的克隆选项卡式浏览器 描述：这是一个例子写的」· VB 代码 · 共 28 行

Public Class ListItem

    Private _Text As String
    Public Property Text() As String
        Get
            Return _Text
        End Get
        Set(ByVal value As String)
            _Text = value
        End Set
    End Property

    Private _Value As String
    Public Property Value() As String
        Get
            Return _Value
        End Get
        Set(ByVal value As String)
            _Value = value
        End Set
    End Property

    Public Overrides Function ToString() As String
        Return _Text
    End Function

End Class