Private Sub Form1_Load(ByVal sender As System.Object, ByVal e As _
      System.EventArgs) Handles MyBase.Load
        For Each ctrl As Control In Me.GetAllControls(TableLayoutPanel1, 1)
            If TypeOf ctrl Is Label Then ctrl.Text = "--"
        Next
    End Sub
 
    Private Function GetAllControls(ByVal panel As TableLayoutPanel, ByVal _
      column As Integer) As List(Of Control)
        Dim res As New List(Of Control)
        For i = 0 To panel.RowCount - 1
            res.Add(panel.GetControlFromPosition(column, i))
        Next
        Return res
    End Function