Sto tentando di fare un metodo che aggiunge uno script a tutte le textbox della pagina (passandogli il form principale):

codice:
         Public Shared Sub HighLight_TextBox(ByVal form_pagina As HtmlForm)
            For Each controllo As Control In form_pagina.Controls
                If TypeOf controllo Is TextBox Then
                    Dim tb As New TextBox
                    tb = DirectCast(controllo, TextBox)

                    tb.Attributes.Add("onMouseOver", "this.style.backgroundColor='#FFFFE0';")
                    tb.Attributes.Add("onMouseOut", "this.style.backgroundColor='#FFFFFF';")

                    tb.Attributes.Add("onFocus", "this.style.backgroundColor='#FFFFE0';this.style.borderWidth='2px';")
                    tb.Attributes.Add("onBlur", "this.style.backgroundColor='#FFFFFF';this.style.borderWidth='2px';")
                End If
            Next
        End Sub
Ma ovviamente, se una textbox è contenuta in un'altro controllo (es. FieldSet), non viene considerata.

Ricordo che una volta se ne è parlato, di ricorsività. Ma non trovo il thread...Qualcuno ricorda come fare ?