PDF de programación - Función Val con Visual Basic. Convertir String a Integer o numérico. Ejemplos con TextBox e InputBox

aprenderaprogramar.com

Función Val con Visual Basic.
Convertir String a Integer o
numérico. Ejemplos con TextBox e
InputBox (CU00318A)
Sección: Cursos
Categoría: Curso Visual Basic Nivel I

Fecha revisión: 2029

Autor: Mario R. Rancel

Resumen: Entrega nº17 del Curso Visual Basic Nivel I

29

© 2006-2029 aprenderaprogramar.com

La función Val con Visual Basic


LA FUNCIÓN VAL

En Visual Basic una petición de datos al usuario no necesitará ser dispuesta en el código, sino que se
obtendrá a través de un objeto prefabricado: un TextBox. Con frecuencia el dato que queremos obtener
será un valor numérico, mientras que sin embargo el contenido de los TextBox es tipo texto. Por ello
deberemos realizar una conversión. La función Val nos permite obtener el contenido de un TextBox en
formato numérico (Integer, Single, Double, etc.).



El contenido que introduce un usuario a través de un TextBox tiene carácter de texto. Para convertir un
número en formato texto a una variable numérica se usa la función Val. La sintaxis a emplear es:

Ejemplo:





Variable = Val(Cadena)

Dim A As Single

A = Val(TextBox1.Text)

Supone que la variable A, que ha sido definida como tipo Single, adopta el contenido numérico del
TextBox denominado TextBox1.

La función Val deja de leer la cadena en el primer carácter que no puede reconocer como parte de un
número. Los espacios en blanco, los tabuladores y los avances de línea se eliminan.

Val(" 38205 (Distrito Norte)") devuelve 38205 como valor numérico. Los espacios en blanco se
eliminan, y el resto de cadena a partir de donde no se puede reconocer un valor numérico se ignora. Si
la cadena empieza con un contenido no numérico Val devuelve cero. Por ejemplo Val (" (Distrito
Norte) 38205 " devuelve cero.

La función Val sólo reconoce el punto (.) como separador decimal válido (aunque esto puede verse
afectado por la configuración regional de tu ordenador). Cuando se usa un separador decimal
diferente, debe realizarse un tratamiento previo de la cadena o utilizarse una función de conversión de
tipos como CSng ó CDbl para convertir la cadena a un número.

Otra forma muy relevante de pedir datos con Visual Basic consiste en el uso de ventanas
de petición de datos (Inputbox). Cuando se invoca la función Inputbox, se despliega una
ventana independiente con un mensaje definido de solicitud de datos al usuario, que dispone de un
Textbox asociado para responder y de botones para aceptar o cancelar. La sintaxis es del tipo n =
Val(InputBox("Introduzca un número", "Introducción de número")), donde n es una variable que toma el
valor que haya introducido el usuario. Valiéndote de la ayuda, prueba a crear distintos Inputbox.



A modo de ejemplo simple para ver el resultado de estas funciones, crea un proyecto y sitúa un TextBox
sobre el formulario. Escribe el pequeño código que indicamos a continuación y comprueba sus
resultados.



© 2006-2029 aprenderaprogramar.com

La función Val con Visual Basic


Código (versionesVB menos recientes):


Rem Curso Visual Basic aprenderaprogramar.com
Option Explicit
Dim A As Single

Private Sub Form_Load()
A = Val(Text1.Text)
MsgBox ("A vale " & A)

A = Val(InputBox("Introduzca un número",

"Introducción de número"))
MsgBox ("A vale " & A)

End Sub










Código (versiones VB más recientes):

REM Curso Visual Basic aprenderaprogramar.com
Public Class Form1
Dim A As Single

Private Sub Form1_Load(ByVal sender As System.Object, ByVal
e As System.EventArgs) Handles MyBase.Load
A = Val(TextBox1.Text)
MsgBox("A vale " & A)
A = Val(InputBox("Introduzca un número", "Introducción de
número"))
MsgBox("A vale " & A)
End Sub
End Class

La función Val convierte a cualquier formato numérico, por tanto puede servir para introducir
contenido en variables de tipo Integer, Long, Single, Double, etc.







Próxima entrega: CU00319A

Acceso al curso completo en aprenderaprogramar.com -- > Cursos, o en la dirección siguiente:
http://www.aprenderaprogramar.com/index.php?option=com_content&view=category&id=37&Itemid=61

© 2006-2029 aprenderaprogramar.com