加入收藏 | 设为首页 | 会员中心 | 我要投稿 李大同 (https://www.lidatong.com.cn/)- 科技、建站、经验、云计算、5G、大数据,站长网!
当前位置: 首页 > 大数据 > 正文

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

发布时间:2020-12-16 22:34:47 所属栏目:大数据 来源:网络整理
导读:前面介绍的都是通过拖拽或者双击工具箱中的控件后,在窗体上创建控件。 如果不采用以上方法是不是就不能创建和使用控件呢? 肯定可以在代码中创建的。 基本步骤 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 教程 目录

(编辑:李大同)

【声明】本站内容均来自网络,其相关言论仅代表作者个人观点,不代表本站立场。若无意侵犯到您的权利,请及时与联系站长删除相关内容!

    推荐文章
      热点阅读