Cómo permitir un cuadro de texto para aceptar sólo números en Microsoft Visual Basic

Como programador, a menudo se necesita para restringir los tipos de caracteres puede introducir un usuario en un control de cuadro de texto. En Visual Basic, puede comprobar fácilmente los caracteres que el usuario está entrando utilizando el KeyDown y KeyPress del control de cuadro de texto. Estos eventos se ejecutará cuando el usuario pulsa una tecla del teclado, que le da el poder para permitir que sólo los números que deben introducirse.

Instrucciones

1 Haga clic en el control de cuadro de texto que desea comprobar y seleccione Propiedades. Haga clic en el icono de eventos, que se asemeja a un rayo. Desplazarse hacia abajo para el evento KeyDown y haga doble clic al lado de él para crear el evento.

2 Agregue la siguiente variable global en el área de las declaraciones a continuación Public Class <nomForm>:

NotANumber As Boolean Dim

3 Copiar y pegar el siguiente código dentro del evento KeyDown para el control de cuadro de texto:

NotANumber = False

If e.KeyCode < Keys.D0 OrElse e.KeyCode > Keys.D9 Then

Si e.KeyCode & lt; Keys.NumPad0 OrElse e.KeyCode> Luego Keys.NumPad9

Si e.KeyCode & lt;> Luego Keys.Back

NotANumber = True

Terminara si

Terminara si

Terminara si

Si Control.ModifierKeys = Entonces Keys.Shift

NotANumber = True

Terminara si

4 Haga clic en el cuadro desplegable y seleccione Eventos KeyPress para crear el procedimiento de evento. Copia el siguiente código dentro de este procedimiento de evento:

Si NotANumber = true A continuación,

e.Handled = True

Terminara si

5 Pulse la tecla "F5" para ejecutar el programa. Su cuadro de texto sólo aceptará números.