vb.net 教程 3-13 动态创建控件1

前面介绍的都是通过拖拽或者双击工具箱中的控件后，在窗体上创建控件。

如果不采用以上方法是不是就不能创建和使用控件呢？

肯定可以在代码中创建的。

基本步骤

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, 70)        mybutton.Location = New Point(100, 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 SubEnd Class

运行效果如下：

由于.net平台下C#和vb.NET很相似，本文也可以为C#爱好者提供参考。

学习更多vb.net知识，请参看vb.net 教程 目录