Sub SchriftanpassungenTextBoxen(Page As Form)
        Try
            For Each Contr As Control In Page.Controls
                If TypeOf Contr Is TextBox Then
                    Schriftanpassung(Contr)
                End If
            Next Contr
        Catch ex As Exception
            Fehler....
        End Try
    End Sub

mein aktuelles .net-Projekt:
http://www.fiman.de
freue mich über Test-Informationen.

Screenshots gibt es hier: http://www.fiman.de