Una de las áreas más frustrantes en la escritura de código en cualquier idioma, incluyendo Visual Basic, consiste en velar por que los usuarios introducir información en una forma que es válido. Los usuarios , sobre todo los inexpertos , pueden encontrar maneras casi ilimitadas para introducir datos no válidos. En el mejor de un programador debe cubrir un número razonable de posibilidades y proporcionar informes de errores comprensibles en el resto de los casos. Visual Basic 6.0 se encarga de la validación con dos términos : " CausesValidation " y "Validar ". Cosas que necesitará
Visual Basic 6.0
Ver Más instrucciones
1

iniciar un nuevo proyecto seleccionando el "EXE estándar " plantilla después de abrir Visual Basic ( VB ) . Esto abre una ventana de formulario denominado " Form1 ". Para demostrar cómo funciona la validación , añadir estos controles a la forma de la " caja de herramientas " sobre la izquierda de la pantalla , haga doble clic en cada uno :

One " Label ", representada por un gran capital "A" icono .

One " TextBox ", representado por un icono de un pequeño cuadrado que contiene las letras "AB ".

Two " CommandButtons ", representado por un icono pequeño rectángulo en blanco.

2

Haga clic en y arrastre los controles que acaba de agregar a separarlos y alinearlos como se enumeran a continuación. Cada control añadió cubre las anteriores , por lo que la parte superior que muestra en este momento es la última " CommandButton ", llamada " Command2 ".

Mover el cuadro " Command2 " para el lado derecho del formulario .

Move " Command1 " por encima " Command2 ".

Move " Label1 " en el lado izquierdo de la forma opuesta " Command1 ".

Move " Texto 1 " por debajo " Label1 . "
3

Haga clic en" Label1 "y cambiar la " "propiedad de la " Leyenda Propiedades " en la columna de la derecha de la pantalla para leer " Introduzca el número deseado entre 1 y 1000 . " Haga clic en " Texto 1 " y eliminar la propiedad "Texto " default . Cambiar las propiedades de " Leyenda " del " Command1 " en " Go" y " Command2 " a " Cancelar". Cambie la propiedad " CausesValidation " de " Command2 " para "Falso ". Nota : No inserte comillas al hacer estos cambios. Utilice el control de arrastre , las pequeñas plazas alrededor de cada control a ampliar en grado suficiente para mostrar todo el contenido .
4

clic en "Ver" en el menú de nivel superior en Visual Basic y seleccione " Código ". Escriba el código siguiente en líneas separadas exactamente como se muestra :

Private Sub Command1_Click ( )

MsgBox " El número es aceptable. "

End Sub

privado Sub Command2_Click ()

End of

End Sub Private Sub

Text1_Validate ( Cancel As Boolean )

Si No IsNumeric ( Text1.Text ) Entonces < br >

Cancelar = True

ElseIf CDbl ( Text1.Text ) < 1 O CDbl ( Text1.Text ) > 1000 Then

Cancelar = True End

Si

Si Cancelar Entonces

MsgBox "El número introducido debe estar entre 1 y 1000 " , vbExclamation

End If End Sub

5

Press "F5 " para ejecutar el programa. Introduzca un número en el formulario y haga clic en " Aceptar". Si el número se encuentra entre 1 y 1000 , verá un mensaje de aceptación. Pon a prueba mediante la introducción de un número fuera de este rango o texto, que luego da un mensaje de error. Utilice este método para validar otras operaciones y realizar las operaciones deseadas sobre la información introducida .