El Guru Programador Velneo
Usuario DESCONOCIDO | Registrate Gratis | Usuarios Registrados
Contro de TextBox.Text (datos obligatorios)
Autor [drobe] Calificacion
Esto devuelve verdadero o falso y pone foco en el TextBox vacio deacuerdo a la condicion de que la propiedad tag del objeto Textbox tenga "S" y si contiene ese valor lo somete a los controles
Los Valores que le debo de pasar son solamente el nombre del formulario y
la misma funcion devuelve verdadero o falso.
Util para controlar campos obligatorios de un formulario solo se coloca al principio del codigo del boton para controlar que los textbos esten completas antes de seguir.

Public Function CONTROLAR(Formulario As Form) As Boolean
Dim controles As Control
For Each controles In Formulario
If TypeOf controles Is TextBox Then
If controles.Tag = "S" Then
If controles.Text = "" Then
CONTROLAR = False
controles.SetFocus
Exit For
Else
CONTROLAR = True
End If
End If
End If
Next
End Function
 
Terminos de Uso

1 - Copiar o Descargarse este contenido implica aceptar los terminos aqui detallados.

2 - Usted puede utilizar este contenido en sus propios programas y puede compilarlo en un programa y modificarlo a su gusto.

3 - Usted NO PUEDE redistribuir este contenido tal como se presenta aqui sin el permiso del autor original del mismo.

4 - Usted seguirá cualquier restricción adicional del copyright que el autor pudo haber puesto en la descripción del contenido.

 

Contactos myStudio Network