SoloCodigo

muy buenas,, con VBnet 2003, con esta parte del código podía colorear los textbox cuando estaba posicionado en algún textbox.

Pero ahora en VBnet 2010, este mismo código me da error.

    Sub Color_Textbox()
        Dim ctrl As Control
        For Each ctrl In Me.Controls
            If (TypeOf (ctrl) Is TextBox) Then
                Dim miTextBox As TextBox
                miTextBox = CType(ctrl, TextBox)
                AddHandler miTextBox.Enter, AddressOf TieneFoco
                AddHandler miTextBox.Leave, AddressOf PierdeFoco
            End If
        Next
    End Sub

en la parte de:

If (TypeOf (ctrl) Is TextBox) Then

el error es: La Expresion de tipo 'control.control' nunca puede ser de tipo 'system.window.forms.textbox'

gracias por la ayuda.