Funciones de VisualBasic

FUNCIONES PROPIAS DE VISUAL BASIC
Se describen las funciones propias del lenguaje que permiten trabajar con
cadenas de caracteres, con números, fechas, horas, presentar mensajes en
pantalla y muchas otras funciones para formatear datos específicos.

Contenido
•

1 - Funciones para el tratamiento de cadenas

•

1.1 - Función Lcase y Ucase

•

1.2 - Función Trim, LTrim y RTrim

•1.3 - Función Len

•

1.4 - Función Asc y Chr

•

1.5 - Función InsTr

•

1.6 - Función Left, Right y Mid

•

1.7 - Función Str y Val

•

2 - Funciones para el tratamiento de números

•

2.1 - Función Round

•

2.2 - Rnd y Randomize - Números aleatorios

•

2.3 - Otras funciones

•

3 - Funciones de formato

•

4 - Funciones de formato para fechas y hora•

4.1 - Funciones para calcular fechas

•

4.2 - Funciones para obtener la fecha y hora de la PC

•

6 - Funciones para presentar mensajes - InputBox y
MSgbox

•

7 - Ejemplos

1 - Funciones para el tratamiento de cadenas
Las funciones de cadena , como su nombre lo indica, se utilizan para trabajar y
tratar las cadenas de caracteres.
A continuación las mas importantes deellas.

1.1 - Función Lcase y Ucase
Estas dos funciones se utilizan para convertir cadenas de texto a minúscula y
mayúscula.
La función Lcase cambia o convierte una cadena de texto a minúscula y un
ejemplo de como utilizarla sería así:

Lcase (cadena que queremos convertir a minúsculas)
Ejemplo:

Dim
cadena

cadena

As
"HOLA

=

'Convertimos
cadena

String
MUNDO"

=LCase(cadena)

'La variable cadena ahora vale "hola mundo"
La función Ucase funciona de la misma manera que Lcase pero convierte el
contenido de una cadena a mayúsculas.
Por ejemplo, si tenemos un control Label1 que contiene un texto que dice:
"Porcentaje de sueldos", escribiendo la siguiente línea:

Label1 = UCase(Label1)
El control Label1 pasaría a mostrar o mejor dicho contener en supropiedad
caption:"PORCENTAJE DE SUELDOS".

1.2 - Función Trim, LTrim y RTrim
Estas tres funciones se utilizan para eliminar los espacios vacíos de una
cadena.
LTrim elimina los espacios vacíos de la parte izquierda de la cadena, RTrim de
la parte derecha y Trim de ambas partes.
Ejemplos:
Tenemos una variable llamada ciudad con el valor " Barcelona". Para eliminar
los espacios vacíos de laizquierda haríamos lo siguiente:

ciudad = LTrim(ciudad)
Si en un TextBox quisieramos borrar todos los espacios vacíos de la parte
derecha de la cadena:

MiText = RTrim(MiText)
La Función Trim elimina todos los espacios vacíos de ambos lados de la
cadena. Ejemplo:

Pais
=
País = Trim(Pais)

"

Argentina

"

Ahora el valor de País es igual a: "Argentina".

1.3 - Función LenLa función Len nos permite conocer la cantidad de caracteres que tiene una
determinada cadena. O sea que esta función nos devuelve un número.
Ejemplo:

Len (Aquí va la cadena que queremos averiguar su tamaño)
Como la función Len devuelve un número debemos asignar ese número
devuelto en una variable de tipo numérica.
Ejemplo:

Dim
Dim
MiCadena

TamanoCadena

As

MiCadena
=

As"Me

Llamo

Long
String
Eustaquio"

TamanoCadena = Len(MiCadena)
El valor de la variable TamanoCadena pasaría a valer 18.
Hay que tener en cuenta que la función Len también toma en cuenta los
espacios vacíos.

1.4 - Función Asc y Chr
La función Asc nos permite obtener el código ASCII de un de terminado
caracter.
Ejempos:
Si queremos obtener el código ASCII del caracter "a", que esel número 97
podríamos hacer lo siguiente:

Dim
num = Asc("a")

num

As

Integer

En definitiva la función Asc lleva un solo parámetro de tipo String del cual
queremos obtener dicho número.
La Función Chr actúa a la inversa de la función Asc, esto quiere decir, que a
partir de un determinado número nos devolverá el caracter ASCII.
Obviamente que en vez de pasarle a la función...