有时需要一些控件加上自定义的属性,下面就介绍自定义控件的简单实现
1、新建一个vb的窗口程序
2、在新建的项目上右键 ->添加-> 新建项
3、向下拖动,找到自定义控件,名字自己取,现在默认
4、添加后多了一个刚刚的文件CustomControl1.vb,展开可以写里面的代码(创建默认打开,没有可以手动打开)
5、现在添加它要继承的父控件,看图点击右上角的,然后他就打开了这个CustomControl1.Designer.vb文件
6、在打开的文件滚动到顶端, Inherits System.Windows.Forms.Control把Control替换成要继承的控件(例如button),Inherits System.Windows.Forms.Button
7、现在添加自定义控件的私有属性,就简单设置个默认显示(diy),代码: Me.Text = "diy"
8、最后在窗体的load事件中添加绘制自定义控件的代码:
复制内容到剪贴板
- Dim d As New CustomControl1
- Me.Controls.Add(d)
9、最后运行就实现了自定义控件,默认就显示diy了