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

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

概述在vb6的时候,很方便在设计的时候创建控件数组。 例如两个按钮控件(CommandButton),当修改其中一个控件名称与另外一个控件名称一样时,vb6编辑器会提示: 按下“是”就会创建控件数组了,两个按钮区别在于Index属性不同: 在实际代码中可以看到,事件参数中多了 Index as Integer,也就是通过Index指明了是哪个具体的按钮: 那么在vb.net中,如果输入了相同的名称:

在vb6的时候,很方便在设计的时候创建控件数组。

例如两个按钮控件(Commandbutton),当修改其中一个控件名称与另外一个控件名称一样时,vb6编辑器会提示:

按下“是”就会创建控件数组了,两个按钮区别在于Index属性不同:

在实际代码中可以看到,事件参数中多了 Index as Integer,也就是通过Index指明了是哪个具体的按钮:

那么在vb.net中,如果输入了相同的名称:

也就是通过设计时候创建控件数组是行不通的。那么在代码中如何实现?

Public Class Form3    Dim mybutton() As button    Private Sub Form3_Load(sender As Object,e As EventArgs) Handles MyBase.Load        ReDim mybutton(3)        For i As Integer = 0 To 3            mybutton(i) = New button            mybutton(i).Size = New Size(100,40)            mybutton(i).Location = New Point(10 + i * 120,100)            mybutton(i).Text = "按钮" & i            Me.Controls.Add(mybutton(i))            AddHandler mybutton(i).Click,AddressOf buttonclick        Next    End Sub    Private Sub buttonclick(sender As Object,e As EventArgs)        Dim clickbutton As button = CType(sender,button)        MessageBox.Show("我按下了 " & clickbutton.Text)    End SubEnd Class

基本步骤如下:

1、创建一个窗体级控件数组

2、窗体载入时,实例化各个控件

3、设置各个控件的属性,不是每个属性都必要。

4、窗体上增加控件

5、添加控件事件

6、创建相应的事件

运行如图:

要区分具体哪个按钮,可以采用一个偷懒的方法,把按钮的index写入 tag 属性:

Public Class Form3    Dim mybutton() As button    Private Sub Form3_Load(sender As Object,100)            mybutton(i).Text = "按钮" & i            mybutton(i).Tag = i            Me.Controls.Add(mybutton(i))            AddHandler mybutton(i).Click,button)        MessageBox.Show("我按下了第 " & clickbutton.Tag & " 个按钮!")    End SubEnd Class

运行时如下:



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

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

总结

以上是内存溢出为你收集整理的vb.net 教程 3-13 动态创建控件3全部内容,希望文章能够帮你解决vb.net 教程 3-13 动态创建控件3所遇到的程序开发问题。

如果觉得内存溢出网站内容还不错,欢迎将内存溢出网站推荐给程序员好友。

欢迎分享,转载请注明来源:内存溢出

原文地址: http://www.outofmemory.cn/langs/1287216.html

(0)
打赏 微信扫一扫 微信扫一扫 支付宝扫一扫 支付宝扫一扫
上一篇 2022-06-09
下一篇 2022-06-09

发表评论

登录后才能评论

评论列表(0条)

保存