前面介绍的都是通过拖拽或者双击工具箱中的控件后，在窗体上创建控件。
如果不采用以上方法是不是就不能创建和使用控件呢？
肯定可以在代码中创建的。
@H_404_7@
基本步骤
1、定义一个窗体级别的变量，类型为需要的控件类型。
如果还要使用该控件的事件，请使用以下语句：
@H_404_7@
Dim WithEvents 变量 As 控件类
@H_404_7@
例如：
Dim WithEvents mybutton As Button
写完会你会发现，多了mybutton的事件
@H_404_7@
@H_404_7@
2、在窗体载入时实例化该控件
mybutton = New Button
3、设置该控件的属性
mybutton = New Button
mybutton.Size = New Size(200,70)
mybutton.Location = New Point(100,100)
mybutton.Text = "按钮"
4、将它加入窗体
Me.Controls.Add(mybutton)
5、选择要激活的事件
@H_404_7@
@H_404_7@
@H_404_7@
比较完整的代码，注意窗体上不要放任何控件：
@H_404_7@
Public Class Form1
Dim WithEvents mybutton As Button
Private Sub Form1_Load(sender As Object,e As EventArgs) Handles MyBase.Load
mybutton = New Button
mybutton.Size = New Size(200,100)
mybutton.Text = "按钮"
Me.Controls.Add(mybutton)
End Sub
Private Sub mybutton_Click(sender As Object,e As EventArgs) Handles mybutton.Click
MessageBox.Show("这是一个按钮")
End Sub
End Class
@H_404_7@
运行效果如下：
@H_404_7@
@H_404_7@
@H_404_7@
由于.net平台下C#和vb.NET很相似，本文也可以为C#爱好者提供参考。
学习更多vb.net知识，请参看vb.net 教程 目录