Usted puede mejorar significativamente el rendimiento de la aplicación de Visual Basic al no tener que comprobar cada carácter introducido por el usuario. En Visual Basic , puede utilizar la función " IsNumeric " para determinar si los datos introducidos es numérico . Esta función devuelve un valor Boolean que indica si una expresión puede evaluarse como un número. Puede utilizar una variable String para capturar texto introducido por el usuario y utilizar la función " IsNumeric " para comprobar la variable. Instrucciones
1

lanzamiento Microsoft Visual Basic Express y haga clic en "Nuevo proyecto " en el panel izquierdo de la pantalla del ordenador . Haga clic debajo de " Visual Basic ", " Plantillas instaladas, " click " Aplicación de Windows Forms " y haga clic en " OK" para iniciar un nuevo proyecto.
2

doble clic en el control " cuadro de texto " en la "Caja de herramientas " panel para agregar uno a su forma . Añadir un " botón " con la misma técnica
3

doble clic en el botón para crear un evento de clic de botón y agregue el código siguiente para crear dos variables: .
< P > numericCheck Dim As Boolean

inputTxt dévil como secuencia
4

Escriba el siguiente código para obtener el valor introducido en el cuadro de texto y comprobar si es numérico con la función " IsNumeric ":

inputTxt = Me.TextBox1.Text

numericCheck = IsNumeric ( inputTxt )
5

Añada el siguiente código mediante la variable booleana y permiten al usuario saber si el valor se numérico :

Si numericCheck Entonces

MsgBox ( " . ha introducido un valor numérico " )

demás

MsgBox ("Usted no se ha introducido valor numérico. " )

End If
6 Pulse

" F5 "para ejecutar el código y haga clic en" Button1 ".