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

Escrito por jaime avelar | Traducido por martín emiliano vergé
  • Comparte
  • Twittea
  • Comparte
  • Pin
  • E-mail
Cómo comprobar si un cuadro de texto de entrada es de tipo numérico en Visual Basic
Cómo comprobar si un cuadro de texto de entrada es de tipo numérico en Visual Basic. (Jupiterimages/Creatas/Getty Images)

Puedes incrementar significativamente el rendimiento de tu aplicación Visual Basic al no tener que revisar cada carácter ingresado por el usuario. En VB, puedes utilizar la función "IsNumeric" para determinar si los datos ingresados son numéricos. Esta función devuelve un valor booleano que indica cuándo una expresión puede ser evaluada como número. Puedes utilizar una variable String para capturar texto ingresado por el usuario y utilizar la función "IsNumeric" para revisar la variable.

Nivel de dificultad:
Moderadamente fácil

Otras personas están leyendo

Instrucciones

  1. 1

    Ejecuta Microsoft Visual Basic Express y haz clic en "Nuevo proyecto" en el panel izquierdo de la pantalla de tu computadora. Haz clic en "Visual Basic" bajo "Plantillas instaladas", haz clic en "Formularios de aplicación de Windows" y en "Aceptar" para comenzar un proyecto nuevo.

  2. 2

    Haz doble clic en el control "Casilla de texto" en el panel "Herramientas" para añadir una a tu formulario. Añade un "Botón" utilizando la misma técnica.

  3. 3

    Haz doble clic en el botón para crear un evento de clic del mismo y añade el código siguiente para crear dos variables:

    Dim numericCheck As Boolean Dim inputTxt As String

  4. 4

    Ingresa el código siguiente para conseguir el valor ingresado en el cuadro de texto y revisar si es numérico utilizando la función "IsNumeric":

    inputTxt = Me.TextBox1.Text numericCheck = IsNumeric(inputTxt)

  5. 5

    Añade el código siguiente utilizando la variable booleana y haz que el usuario sepa si el valor fue numérico:

    If numericCheck Then MsgBox("Has ingresado un valor numérico.") Else MsgBox("No has ingresado un valor numérico.") End If

  6. 6

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

No dejes de ver

Filtrar por:
  • Mostrar todos
  • Artículos
  • Galerías de fotos
  • Videos
Ordenar:
  • Más relevante
  • Más popular
  • Más reciente

No se encuentran artículos disponibles

No se encuentran slideshows disponibles

No se encuentran videos disponibles