Public 长度() As TextBox = { Pipe_0 , Pipe_1 , Pipe_2 , Pipe_3 }
创新互联公司2013年成立，先为吉阳等服务建站，吉阳等地企业，进行企业商务咨询服务。为吉阳企业网站制作PC+手机+微官网三网同步一站式服务解决您的所有建站问题。
这个数组定义是有问题的，你定义的是TextBox数组，{}号里必须是而TextBox类型，例如：
Public 长度() As TextBox = { New TextBox , New TextBox , New TextBox }
Pipe_0-3不是任何类型和值，这个VS应该直接报错才对！标准的定义应该如下：
Public Class Pipe
Public 长度() As TextBox
Sub New()
Me.长度 = {New TextBox, New TextBox, New TextBox, New TextBox}
End Sub
Private Sub xxxxxxxxxxxx.Click
MsgBox(长度(2).Name)
End Sub
End Class
vb.net已经去掉了控件数组这个类，不过有个代替该方式的一个属性：Tag，你可以把这些关联的Tag属性设置为同一标记，如：a。然后遍历所有的checkbox并且tag为a的则选定：Protected Sub chkAll_Click() For Each ctl As Control In Me.Controls ''如果checkbox在一个容器里，比如groupbox，那可以用groupbox.controls
If ctl.GetType().Name.ToLower() = "checkbox" Then
CType(ctl, CheckBox).Checked = CheckBox3.Checked
End If
NextEnd Sub
1、声明数组的语句：
Dim types( ) As integer
2、然后使用ReDim语句来配置数组大小。
ReDim Types(X+1)
3、假设想改变数组大小又不想丢失原来的数据，仅仅要在ReDim语句中包括Preservekeyword就能够，典型语句为：
ReDa_m PresetVe Types(10，23)
对于多维数组，在使用Preservekeyword时，仅仅能改动最后一维的大小。假设改变其它维，那么将出现执行错误。假设不清楚某维的当前大小，能够使用GetI~ength函数来获取。
扩展资料：
数组的使用：
用For Each来循环遍历一个数组。比如：
Dim x As Integer
F0r Each x In arrayl
Console．WriteLine(x)
Next
在使用数组时还要注意，不仅声明语法有变化，并且在执行时处理方式也有了非常大的变化。VB．NET在堆栈中给数组分配地址空间，当向一个方法传递数组类型的参数时，使用的是引用传递而不是值传递。以下是互相传递数组引用的三个方法：
Dim arrayl(3，3)AS Integer
Dim array2 As Integer(，)
Redim array2(3，3)
Dim array3 As Integer(，)={{2，4}，{12，29}}