Tecnología

Inicio

Cómo comprobar si un cuadro de texto de entrada es numérico en Visual Basic

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 VB, puede utilizar la función "IsNumeric" para determinar si los datos introducidos son numéricas. Esta función devuelve un valor booleano que indica si una expresión se puede evaluar como un número. Se puede utilizar una variable de cadena para capturar texto introducido por el usuario y utilizar la función de "IsNumeric" para comprobar la variable.

Instrucciones

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

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

3 Haga doble clic en el botón para crear un evento de clic de botón y añada el siguiente código para crear dos variables:

Dim numericCheck As Boolean

Dim inputTxt As String

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

inputTxt = Me.TextBox1.Text

numericCheck = IsNumeric (inputTxt)

5 Agregue el siguiente código utilizando la variable de Boole y permiten al usuario saber si el valor numérico fue:

If numericCheck Then

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

Más

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

Terminara si

6 Pulse la tecla "F5" para ejecutar el código y haga clic en "Button1".