有时需要一些控件加上自定义的属性,下面就介绍自定义控件的简单实现

1、新建一个vb的窗口程序

visualstudio,控件

2、在新建的项目上右键 ->添加-> 新建项

visualstudio,控件

3、向下拖动,找到自定义控件,名字自己取,现在默认

visualstudio,控件

4、添加后多了一个刚刚的文件CustomControl1.vb,展开可以写里面的代码(创建默认打开,没有可以手动打开)

visualstudio,控件

5、现在添加它要继承的父控件,看图点击右上角的,然后他就打开了这个CustomControl1.Designer.vb文件

visualstudio,控件

6、在打开的文件滚动到顶端, Inherits System.Windows.Forms.Control把Control替换成要继承的控件(例如button),Inherits System.Windows.Forms.Button

visualstudio,控件

7、现在添加自定义控件的私有属性,就简单设置个默认显示(diy),代码: Me.Text = "diy"

visualstudio,控件

8、最后在窗体的load事件中添加绘制自定义控件的代码:

复制内容到剪贴板
  1. Dim d As New CustomControl1   
  2.   
  3.         Me.Controls.Add(d)  

visualstudio,控件

9、最后运行就实现了自定义控件,默认就显示diy了

visualstudio,控件