Dim TB As TextBox
        For Each c As Control In Me.Controls
            If TypeOf c Is TextBox Then
                TB = c
                TB.Text = "NeuerText"
                TB.BackColor = Color.Yellow
            End If
        Next

Gru?

Silver