VB2008控件数组全解(绝对经典,代码为本人自行设计并调试运行成功~~)

概述  VB2008控件数组(绝对经典~~) 1.VB2008控件数组不再支持(但还可引用vb6中的数组,并按vb6规则处理) 在 Visual Basic 6.0 中，控件数组可用于管理窗体上的控件；它们提供的功能可共享事件处理程序、循环访问控件组以及在运行时添加控件; Visual Basic 2008 中不再支持控件数组。对事件模型的更改使控件数组不再必需. 2.vb6与vb2008控制数组差异

VB2008控件数组(绝对经典~~)

1.VB2008控件数组不再支持(但还可引用vb6中的数组,并按vb6规则处理)
在 Visual Basic 6.0 中，控件数组可用于管理窗体上的控件；它们提供的功能可共享事件处理程序、循环访问控件组以及在运行时添加控件;

Visual Basic 2008 中不再支持控件数组。对事件模型的更改使控件数组不再必需.

2.vb6与vb2008控制数组差异
在 Visual Basic 6.0 中，可使用 Load 语句在运行时向控件数组添加控件。控件必须和控件数组是同一类型，并且控件数组必须在设计时创建，且必须带有至少一个元素。添加

控件后，必须将 Visible 属性设置为 True;

在 Visual Basic 2008 中，通过在 Dim 语句中使用 New 关键字，然后将 Add 方法用于要添加控件的容器，可在运行时添加控件.

3.vb2008控件数组(还按vb6说法,vb2008不再使用控件数组)

以下一段程序代码是在窗体上生成10个TextBox,并让他执行同一段代码的程序代码;
在窗体上放置一个button控件(该控制名使用默认值);
在程序代码窗口中粘贴如下代码:
运行后就可以看到窗体上显示的10个TxtBox
点击各个txtBox,就会调用txtclick过程,在相应的txtBox中输入不同的内容;

代码:
Public Class Form1
Private Sub button1_Click(ByVal sender As System.Object,ByVal e As System.EventArgs) Handles button1.Click
Dim i As Integer,TxtBox As TextBox
For i = 1 To 10

TxtBox = New TextBox TxtBox.left = 100 TxtBox.top = (TxtBox.Height + 3) * (i - 1) TxtBox.WIDth = 200 TxtBox.name = "txtBox" & i TxtBox.Tag = i Me.Controls.Add(TxtBox) AddHandler TxtBox.Click,AddressOf TxtClick Next End Sub Private Sub TxtClick(ByVal Sender As TextBox,ByVal e As System.EventArgs) Select Case Sender.name Case "txtBox1" To "txtBox5" Sender.Text = Sender.name & "前面五个窗口,程序开发:张绪军QQ:258020191" Case Else Sender.Text = Sender.name & "后面五个窗口" End Select End Sub End Class

总结

以上是内存溢出为你收集整理的VB2008控件数组全解(绝对经典,代码为本人自行设计并调试运行成功~~)全部内容，希望文章能够帮你解决VB2008控件数组全解(绝对经典,代码为本人自行设计并调试运行成功~~)所遇到的程序开发问题。

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