Public Class clsDeshabilita Public Sub Deshabilita(ByVal NombreControl As TextBox, ByVal Bandera As Boolean) NombreControl.Enabled = Bandera End Sub End Class