vb.net自己写控件 vb通过代码生成控件

VB.NET中如何动态创建控件

Option Explicit

专注于为中小企业提供成都做网站、成都网站制作服务,电脑端+手机端+微信端的三站合一,更高效的管理,为中小企业龙南免费做网站提供优质的服务。我们立足成都，凝聚了一批互联网行业人才，有力地推动了超过千家企业的稳健成长，帮助中小企业通过网站建设实现规模扩充和转变。

Private WithEvents NewTextBox As TextBox

'通过使用WithEvents关键字声明一个对象变量为新的命令按钮

Private Sub Command1_Click()

If NewTextBox Is Nothing Then

Set NewTextBox = Controls.Add("VB.TextBox", "cmdNew", Form1)

NewTextBox.Move 200, 200

NewTextBox.Width = Form1.Width - 450

NewTextBox.Height = Form1.Height - 1400

NewTextBox.Visible = True

End If

End Sub

Private Sub Command2_Click()

If NewTextBox Is Nothing Then

Exit Sub

Else

Controls.Remove NewTextBox

Set NewTextBox = Nothing

End If

End Sub

web.config里注册，类似下面

system.web

pages

controls

add tagPrefix="scottgu" src="~/Controls/Header.ascx" tagName="header"/

add tagPrefix="scottgu" src="~/Controls/Footer.ascx" tagName="footer"/

/controls

/pages

/system.web

注意这里的路径一定不能错，否则显示不出来

注册用户控件时使用绝对路径，而不是相对路径

mytest1是继承自什么类，通常应该继承自UerControl，虽然你这样也能编译通过，但实际上没有任何意义。所以你先改了再说。继承之后，编译，工具箱就会多这么个控件，拖动到Form1上，这样按钮下就不用再new了。然后你再来问。

用vs.net创建控件项目，其他的和vb类似...

新建项目-windows 窗体控件库

文章名称：vb.net自己写控件 vb通过代码生成控件
本文网址：http://myzitong.com/article/dooeoec.html