vb.net中控件数组 vb 控件组

vb.net2013中创建控件数组

我是VB.Net 2010，你看看能行不。

Public Class Form1

Private MyTextBoxArray As New ArrayList

Private Sub Button1_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles Button1.Click

Dim i As Integer

For i = 0 To 8 '利用循环语句动态加入控件数组。

Dim FirstTextBox As New TextBox

'定义文本框对象

Me.Controls.Add(FirstTextBox)

'将一个文本框控件加入到Form上

MyTextBoxArray.Add(FirstTextBox)

'将文本框控件加入到例表集合中

MyTextBoxArray.Item(i).top = i * MyTextBoxArray.Item(i).height + 20 '修改新加入控件在Form上的位置

MyTextBoxArray.Item(i).left = 100

FirstTextBox.TabIndex = i

'修改新加入控件的TabIndex值

MyTextBoxArray.Item(i).text = "TextBox" i.ToString '修改默认文本。

Next

End Sub

End Class

相关问答

Q1: VB.net 控件数组

你这是控件数组？你这明明就是9个不同的 TextBox 控件啊，只不过名字长得像而已。

Q2: 在VB.net里定义的控件数组怎么定义事件

Imports System.Text

Imports System.Windows

Imports System.Windows.Forms

Public Class Netin '类 名

  'Inherits Forms.Form

   Public Shared Netin As New Form

   Public components As ComponentModel.IContainer

   Protected Overrides Sub Finalize()

        MyBase.Finalize()

   End Sub   

   DebuggerStepThrough()

   Public Sub InitializeComponent()

     Me.components = New ComponentModel.Container()

     Dim resources As ComponentModel.ComponentResourceManager = New System.ComponentModel.ComponentResourceManager(GetType(bjt))

     Me.TextBox1 = New TextBox(Me.components)

     Me.Button1 = New Button(Me.components)

    'For … Next  

     Me.Controls.Add(Me.TextBox1)

     Me.Controls.Add(Me.Button1)

     Me.m = New ContextMenuStrip(Me.components)

     Me.m1.Text = "菜单项1"     

    '设置并添加相关控件vb.net中控件数组，(窗体)Netin 初始化。

   End Sub

   Private Sub Form_Load(sender As Object, e As EventArgs) Handles Me.Load

   '加载后显示窗体Netin。

   End Sub

   Public Sub ObjClick(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles Button1.Click,Button2.Click,Button3.Click,TextBox1.Click 

     MessageBox.Show("你按vb.net中控件数组了鼠标")

   End Sub

   Public WithEvents TextBox1 As TextBox

   Public WithEvents Button1 As Button

   Public WithEvents Button2 As Button

   Public WithEvents Button3 As Button

   Friend WithEvents m As ContextMenuStrip

   Friend WithEvents m1 As ToolStripMenuItem

End Class

Class MainWindow

    Netin.Show()

    Netin.Button2.Text = "Main"

   ……

Q3: vb中控件数组的类型可以不同

可以不同。

开发人员在 Visual Basic 6.0 以及更早vb.net中控件数组的版本中使用控件数组主要有以下三个理由：

1. 在循环中访问数组中控件vb.net中控件数组的属性。

2. 向窗体动态添加新控件。

3. 允许一个事件例程与多个控件连接 。

控件数组的使用vb.net中控件数组，极大的方便了开发人员。然而vb.net中控件数组，刚刚从Visual Basic6.0（以下简称VB6.0）过渡到Visual Basic.Net（以下简称VB.NET）的初学者却发现vb.net中控件数组，在VB.NET中似乎不能使用控件数组了。笔者仔细查阅了VB.NET的MSDN文档发现，在 VB.NET 中，确实不再支持控件数组。原因是，VB.NET对事件模型作了很大的改动，引入了另外一种数据类型――控件集合模型，使控件数组没有存在的必要。就像 VB6.0 中的控件数组可以共享事件一样，VB.NET 中的事件模型允许任何事件处理程序都可以处理来自多个控件的事件，这就允许创建属于不同类型但共享相同事件的控件组。

关于vb.net中控件数组和vb 控件组的介绍到此就结束了，不知道你从中找到你需要的信息了吗 ？如果你还想了解更多这方面的信息，记得收藏关注本站。