se l'errore è che non ti funziona il controllo se è una TextBox devi scriverlo così

codice:
        Dim controllo As Control

        For Each controllo In Me.Controls
            If controllo.GetType = "System.Windows.Forms.TextBox" Then
                ...
            End If
        Next
fammi sapere ciao