<Category("MAX Member")> _
    Public Property mShowControlLength As Integer
        Get
            Return xShow.Width
        End Get
        Set(value As Integer)
            xShow.Width = value
        End Set
    End Property

<Category("MAX Member")> _
    Public Property mShowWidth As Integer
        Get
            Return _showWidth        ‘使用自定义的变量来输出设定值
        End Get
        Set(value As Integer)
            _showWidth = value
            xShow.Width = _showWidth
            If (Me.DesignMode) Then
                xItemPanel.Refresh()
            End If
        End Set
    End Property