vb.net怎么批量操作控件？如label1、label2、label3这样的

[KPBer]

如题，发现vb.net不支持控件数组了，那要怎么批量操作label1、label2、label3这样的控件呢。
比如有label1、label2、label3.....label999，我需要把它们的text属性用for语句或其他方法批量更改为1、2、3....999，要怎么做呢？谢谢！

[ZhangNan20100811]

给你个笨点的方法，点击button时，label的text属性

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

        Dim arr As New ArrayList
        arr.Add(Me.Label1.Text)
        arr.Add(Me.Label2.Text)
        arr.Add(Me.Label3.Text)
        arr.Add(Me.Label4.Text)
        arr.Add(Me.Label5.Text)
        For i As Integer = 0 To arr.Count - 1
            arr(i) = Replace(arr(i), arr(i), i + 1)
        Next
        Me.Label1.Text = arr.Item(0)
        Me.Label2.Text = arr.Item(1)
        Me.Label3.Text = arr.Item(2)
        Me.Label4.Text = arr.Item(3)
        Me.Label5.Text = arr.Item(4)

    End Sub

[bdmh]

FindControl，根据后面的数字，
FindControl("lable"+i.ToString())

[KPBer]

[Quote=引用 2 楼 的回复:]
FindControl，根据后面的数字，
FindControl("lable"+i.ToString())
[/Quote]
这个后面好像无法接.text，要怎么改属性呢，有实例吗

[subMain]

.Net中删除了控件数组这个概念。
但是在.Net中每一个容器都有一个名叫Controls的属性，这个属性中存放着这个容器里的所有控件。
窗口也是一个容器，你参考一下下面的这段代码：

'循环窗口中的所有控件
For Each con As Control In Me.Controls
    '如果当前控件是Label的时候
    If TypeOf con Is Label Then
        '改变Label的Text属性
        con.Text = con.Text.Substring(5)
    End If
Next con

[KPBer]

[Quote=引用 4 楼 的回复:]
.Net中删除了控件数组这个概念。
但是在.Net中每一个容器都有一个名叫Controls的属性，这个属性中存放着这个容器里的所有控件。
窗口也是一个容器，你参考一下下面的这段代码：

VB.NET code

'循环窗口中的所有控件
For Each con As Control In Me.Controls
'如果当前控件是Label的时候
If TypeOf……
[/Quote]


报这个，另外容器中有很多label，我指向更改名为label1、label2、label3这样的，在For Each con As Control In Me.Controls语句内查看con下面的方法，好像没有看到能返回具体控件名的呢

[ryueiketu]

For Each con As Control In Me.Controls

if TypeOf con Is System.Windows.Forms.Label Then

Ctype(con,System.Windows.Forms.Label).Text = "AAA"
End If
Next