Перебирать текстовые поля в vb.net

Если элементы управления TextBox находятся только в основной форме, вы можете перебирать их в цикле:

For Each tb As TextBox In Me.Controls.OfType(Of TextBox)()
  tb.Text = String.Empty
Next

Если они находятся на панели, замените ключевое слово Me на название панели.

Вы можете создать список и прокрутить его:

Dim boxes As New List(Of TextBox)() From { _
    TextBox1, _
    TextBox2 _
}
boxes.Add(TextBox3)

For Each tb As TextBox In boxes
    tb.Text = ""
Next

Если у вас есть форма с элементами управления TextBox внутри других элементов управления, таких как Panel или GroupBox, вы можете попробовать использовать рекурсивную функцию, подобную этой, чтобы получить их все. (По сути, это преобразование C# в VB ответа здесь)

Private Function GetTextBoxes(root As Control) As IEnumberable(Of TextBox)
    Dim container = TryCast(root, ContainerControl)
    If container IsNot Nothing Then
        For Each c As Control In container.Controls
            For Each i As Control In GetTextBoxes(c)
                Yield i
            Next
        Next
    End If
End Function

Чтобы создать список из вашей основной формы:

Dim allBoxes As List(Of TextBox) = GetTextBoxes(Me).ToList()

Для справки, вы МОЖЕТЕ создать массив объектов TextBox следующим образом:

Dim tbArray() As TextBox = New TextBox() {TextBox1, TextBox2, TextBox3}

Или объявите массив и прокрутите элементы управления TextBox, чтобы добавить их в него. Однако подход List(Of TextBox) будет работать просто отлично, если вам нужно сохранить их коллекцию или просто перебирать элементы управления TextBox в форме, если вам просто нужно установить свойства в одном подразделе или функции.