Validar Datos

Private Sub Text1_KeyPress(KeyAscii As Integer)
If IsNumeric(Text1. Text) = False Then
KeyAscii=0
end if
end sub

La propiedad MaxLength determina la longitud máxima de una cadena en un cuadro de texto. El sistema emitirá un sonido (beep) cuando el usuario trate de escribir una cadena que exceda la longitud máxima. Si se desea visualizar un mensaje de error, senecesita interceptar la tecla oprimida en el evento KeyPress.

Uso de la propiedad Locked

La propiedad Locked determina si los usuarios pueden modificar los datos en un cuadro de texto. Si la propiedad Locked es establecida a True, los usuarios sólo pueden ver y copiar los datos de un cuadro de texto.

Uso del Evento KeyPress para Validar Datos

Se pueden emplear los eventos KeyPress,KeyDown y KeyUp para validar datos mientras el usuario escribe. Se puede prevenir que el usuario ingrese ciertos caracteres (por ejemplo, puede limitar el ingreso de datos a valores numéricos). Se puede también modificar los datos mientras son ingresados (por ejemplo, puede convertir todos los caracteres a mayúsculas).

El evento KeyPress tiene lugar cuando el usuario ingresa un carácter ASCIIestándar. Esto no incluye la mayoría de la teclas especiales, tales como las teclas de función, las teclas direccionales, o la tecla DELETE. Para responder a estas teclas se debe emplear los eventos KeyDown y KeyUp. El siguiente código cambia los caracteres a mayúsculas mientras el usuario escribe.

Private Sub Text1_KeyPress(KeyAscii as Integer)

KeyAscii = Asc(Ucase(Chr(KeyAscii)))

End SubValidación de Información a Nivel de Formulario
Además de emplear técnicas a nivel de campo para validar los datos mientras son ingresados, se puede escribir código que valide los datos en todos los campos de un formulario al mismo tiempo. En esta parte del curso se verán las técnicas de validación a nivel de formulario soportadas por Visual Basic.
Habilitando el Botón Aceptar
Una forma devalidar la información del formulario sería la de asegurar que un usuario ha ingresado los datos en todos los campos en un formulario antes de que se le permita continuar. Esto puede llevarse a cabo deshabilitando el botón Aceptar en un formulario hasta que el usuario haya llenado todos los campos, como se muestra a continuación.
.

Para comprobar cada tecla oprimida en un formulario, se debeestablecer la propiedad KeyPreview de un formulario a True. El formulario recibe primero el evento del teclado y luego lo recibe el control.
El siguiente código habilita el botón Aceptar luego de ingresar datos en todos los campos.

Validación de Todos los Campos de un Formulario
Una manera sencilla de validar todos los campos de un formulario al mismo tiempo es poniendo el código de validación en elevento Click del botón Aceptar. En esta caso, la aplicación le permite al usuario completar el ingreso de datos en todos los campos del formulario y luego validarlos. La aplicación establece el enfoque en el primer campo que contiene los datos incorrectos.
El siguiente código valida todos los campos numéricos del formulario mostrado anteriormente.

Private SubbtnFin_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) _
Handles btnFin.Click
Timer1.Stop()
End Sub
El siguiente ejemplo evita que se digite un número:
Private Sub TextBox1_KeyPress(ByVal sender As Object, ByVal _
e As System.Windows.Forms.KeyPressEventArgs) Handles TextBox1.KeyPressIf IsNumeric(e.KeyChar) Then e.Handled = True
End Sub
,,,,,,,,,,,,,,,,
El siguiente ejemplo válida que la entrada unicamente acepte números (permite borrar la entrada):

Private Sub TextBox1_KeyPress(ByVal sender As Object, ByVal _
e As System.Windows.Forms.KeyPressEventArgs) Handles TextBox1.KeyPress...