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 Sub

End Class

 

运行效果如下：

 

 

 

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

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