前面介绍的都是通过拖拽或者双击工具箱中的控件后,在窗体上创建控件。
如果不采用以上方法是不是就不能创建和使用控件呢?
肯定可以在代码中创建的。
基本步骤
1、定义一个窗体级别的变量,类型为需要的控件类型。
如果还要使用该控件的事件,请使用以下语句:
Dim WithEvents 变量 As 控件类
例如:
Dim WithEvents mybutton As Button
写完会你会发现,多了mybutton的事件
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、选择要激活的事件
比较完整的代码,注意窗体上不要放任何控件:
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
运行效果如下:
由于.net平台下C#和vb.NET很相似,本文也可以为C#爱好者提供参考。
学习更多vb.net知识,请参看vb.net 教程 目录