055自定义控件之为控件添加属性

ngbshzhn

于 2020-05-18 16:17:50 发布

阅读量257

点赞数

分类专栏： # Visual Basic 2010 基础

本文链接：https://blog.youkuaiyun.com/ngbshzhn/article/details/106194002

版权

本文介绍了如何创建一个自定义的Windows窗体控件LimitedCheckedList，它继承自CheckedListBox并添加了MaxItemsSelected属性。当用户尝试选择超过该属性限制的列表项时，会触发MaxItemsChange事件。通过详细步骤，包括项目创建、属性与事件的添加、DLL生成以及在新的测试项目中应用和测试控件的功能。

摘要生成于 C知道，由 DeepSeek-R1 满血版支持，前往体验 >

(1)创建一个新的“Windows窗体控件库”项目，命名为LimitedCheckedList，并将项目文件名修改为LimitedCheckedLisLvb。
(2)打开代码编辑窗口，并添加属性MaxltemsSelected。

Imports System.ComponentModel

Public Class LimitedCheckedList
    Inherits System.Windows.Forms.CheckedListBox
    Private AutoScaleMode As AutoScaleMode
    Private _MaxItemsSelected As Integer = 5
    <DefaultValue(5), Description("用户最多可以选择的列表项数目"), Category("其他")> _
    Public Property MaxItemsSelected As Integer
        Get
            Return _MaxItemsSelected
        End Get
        Set(ByVal value As Integer)
           
            If value < 5 Then
                Throw New ArgumentException("不能超过5个")
            Else
                _MaxItemsSelected = value
            End If

        End Set
    End Property

    Public Event MaxItemOver(ByVal sender As Object, ByVal c As EventArgs)

    Private Sub LimitedCheckedList_ItemCheck(ByVal sender As Object, ByVal e