Public Class Form1
    Private mlstLabels As List(Of Label) = Nothing
 
    Private Sub Form1_Load(ByVal sender As System.Object, ByVal e As _
      System.EventArgs) Handles MyBase.Load
        mlstLabels = New List(Of Label)
 
        For intIndex As Integer = 0 To Panel1.Controls.Count - 1
            If (TypeOf Panel1.Controls(intIndex) Is Label) Then
                mlstLabels.Add(CType(Panel1.Controls(intIndex), Label))
            End If
        Next
    End Sub
 
    Private Sub Button1_Click(ByVal sender As System.Object, ByVal e As _
      System.EventArgs) Handles Button1.Click
        For intIndex As Integer = 0 To mlstLabels.Count - 1
            mlstLabels(intIndex).Text = "Hallo"
        Next
    End Sub
End Class

--------------------

Ich habe keine besondere Begabung, sondern bin nur leidenschaftlich neugierig.
- Albert Einstein

For i = 1 To 30
Label + i + .Text = System.Net.Dns.GetHostEntry(Label + i + .Text).HostName)
Next

For i = 1 To 30
Label(i).Text = System.Net.Dns.GetHostEntry(Label(i).Text).HostName)
Next

Ich arbeite mit:
Windows 10 Professional 64-bit * Visual Basic 2010 Express

--------------------

Ich habe keine besondere Begabung, sondern bin nur leidenschaftlich neugierig.
- Albert Einstein

For i = 1 To 30
For Each ctl As Control In CollectedControls(Me)
 - Wie würde ich jetzt hier die Zählervariable unterbringen um auf das _
   jeweilige Objekt zuzugreifen? -
End For
Next

For Each c As Control In Me.Panel1.Controls
   If TypeOf c Is Label Then
      Dim l As Label = CType(c, Label)
      l.Text = "xyz"
   End If
Next