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,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 教程 目录

原文地址：https://www.jb51.cc/vb/256302.html