trianguloManual Visual Basic paso a paso – Tema 4


Funciones.

 

Estas consideraciones nos llevan a las dos primeras funciones con cadenas:

 

Str (número) Convierte un número a una cadena en numeración decimal.

Val (cadena numérica) Obtiene el valor (el número) correspondiente a esa cadena.

Ejemplos

Variablenumerica = Val (Text1.Text)

Este ejemplo convierte la cadena de caracteres (numéricos) que hubiese en la caja de texto Text1 en un número, y asocia este número a la variable Variablenumerica.

Si el contenido de la caja de textos no fuesen caracteres numérico (abcd, por ejemplo), Variablenumerica tomaría el valor 0.

Label1.Caption = Str (Variablenumerica)

 

Este ejemplo pondría en la etiqueta Label1 los caracteres correspondientes al valor que tuviese la variable Variablenumerica .

 

Existe una función más amplia que Str. Se trata de Cstr. Esta función no solamente transforma un número a una cadena, como hace Str, sino que convierte cualquier tipo de variable a una variable tipo String (cadena).

Esta función transforma, por ejemplo, una variable tipo Booleana en una variable de cadena, devolviendo la cadena “Verdadero” si el valor de la variable booleana es True, y “Falso” si es False.

Puede también transformar a una cadena de caracteres el valor de un CheckBox o de un OptionButton. En estos casos devuelve 0 y 1 para el CheckBox (Desactivado / Activado) y Verdadero ó Falso para el OptionButton (Activado / Desactivado)

label1.Caption = CStr(booleana) Label1.Caption = Verdadero si booleana es true

Label1.Caption = Falso si booleana es False

Label2 = CStr(Check1.Value) Label2.Caption = 1 si Check1 está activado

Label2.Caption = 0 si Check1 está desactivado

Label3 = CStr(Option1.Value) Label3.Caption = Verdadero si Check1 está activado

Label3.Caption = Falso si Check1 está desactivado

 

Si se aplica Cstr a una variable tipo Fecha/Hora devuelve la fecha / Hora en formato corto.

 

 

 

Funciones de cadena:

 

Left (cadena, n) – Extrae los n primeros caracteres de una cadena, comenzando por la izquierda.

Si cadena = Curso de Visual Basic (Para todos los ejemplos)

Resultado = Left (cadena, 10) —-> Resultado = Curso de V

 

Right (cadena, n) Extrae lo n últimos caracteres de la cadena

Resultado = Right (cadena, 10) —-> Resultado = sual Basic

 

Mid (cadena, m, n) – Extrae n caracteres de la cadena, siendo el primer carácter extraído el que ocupa el lugar m.

Resultado = Mid (cadena, 3, 10) —-> Resultado = rso de Vis

 

LCase (cadena) Devuelve otra cadena igual, pero con todos los caracteres en minúsculas. (LCase = Lower Case)

Resultado = Lcase (cadena) —-> Resultado = curso de visual basic

 

UCase (cadena) Devuelve otra cadena igual, pero con todos los caracteres en mayúsculas. (UCase = Upper Case)

Resultado = UCase (cadena) —-> Resultado = CURSO DE VISUAL BASIC

 

Len (cadena) Devuelve la longitud de la cadena

Resultado = Len (cadena) —-> Resultado = 21

LenB (Cadena) Devuelve el número de Bytes empleados para almacenar la cadena. Sorpréndase, es el doble que Len (Cadena)

 

String (n, carácter) Devuelve una cadena de n caracteres como el indicado

Resultado = String (8, “a”) —-> Resultado = aaaaaaaa

Resultado = String (8, Chr(65)) —-> Resultado = AAAAAAAA

Resultado = String (8, 65) —-> Resultado = AAAAAAAA

 

Space (n) Devuelve una cadena formada por n espacios.

Resultado = “A” + Space (6)+ “B” —-> Resultado = A B

 

LTrim Elimina los posibles espacios que tenga una cadena por su izquierda.

Rtrim Elimina los posibles espacios que tenga una cadena por su derecha.

Trim Elimina los espacios que tenga una cadena, tanto por su izquierda como por su derecha. (No elimina los espacios centrales de la cadena)

Estas tres funciones se emplean para quitar los posibles espacios que pueden resultar de una entrada de datos. Tienen especial importancia cuando se toman los datos de un archivo o base de datos, donde fueron introducidos por otro programa.

No se pone ningún ejemplo de estas funciones, pues sería difícil verlo impreso.

 

InStr (cadena, cadena1) Busca la cadena1 dentro de cadena y devuelve el número de orden dentro de cadena donde se encuentra la primera letra de cadena1

Resultado = InStr (cadena, “sua”) —-> Resultado = 12

 

StrConv Convierte una cadena de caracteres en otra, según las instrucciones que le sigan. Puede sustituir a UCase o LCase si la instrucción es UpperCase o LowerCase respectivamente, o poner la primera letra de todas las palabras de la cadena en mayúsculas, si la instrucción es ProperCase.

 

X = StrConv (cadena, UpperCase) —-> Resultado = CURSO DE VISUAL BASIC

Y = StrConv (cadena, LowerCase) —-> Resultado = curso de visual basic

L = StrConv (cadena, ProperCase) —-> Resultado = Curso De Visual Basic

 

 

Instrucción Mid

Mid puede usarse también para cambiar el contenido de una cadena. Observe la sutileza entre Mid como Función de cadena y Mid como Instrucción.

La Instrucción Mid reemplaza un número especificado de caracteres en una variable de cadena con caracteres de otra cadena.

Sintaxis Mid(cadena1, inicio[, longitud]) = cadena2

Resultado Mid (cadena, 7,2)=”Sobre” —- > Resultado = Curso sobre Visual

 

 

Otras Funciones con números

CInt Parte entera Devuelve la parte entera de un número con decimales

Abs Valor Absoluto Devuelve el valor absoluto de un número

Sgn Signo Devuelve el signo de un número

Sqr Raíz cuadrada Devuelve la raíz cuadrada de un número

Exp Exponenciación Devuelve el número elevado al exponente indicado

Log Logaritmo Devuelve el logaritmo natural de ese número

 

Trigonométricas

Sin Seno Devuelve el valor del seno de un ángulo (Expresado en radianes)

Cos Coseno Devuelve el coseno de un ángulo (En radianes)

Tan Tangente Devuelve la tangente de un ángulo

Atn Arco Tang. Devuelve un arco cuya tangente sea el número (Angulo en radianes)

 

Una función curiosa

Timer Tiempo acumulado Devuelve el tiempo (en segundos) que ha pasado desde las 12 de la noche.

Generación de números aleatorios

Randomize (Numero) Inicia el generador aleatorio tomando como dato de partida el Numero. Devuelve el resultado en una variable llamada Rnd.

La forma de obtener números realmente aleatorios es introducir como parámetro un número que sea variable con el tiempo. Ese número no puede ser otro que el número timer visto antes. Y siempre con la precaución de que medie mas de un segundo entre dos instrucciones Randomize. La función toma entonces la forma:

Randomize Timer

La función Randomize devuelve una variable Rnd con un número comprendido entre 0 y 1 (Nunca será 0 ni 1) Leyendo el valor de la variable sucesivas veces, se puede obtener una sucesión de números aleatorios. No es necesario ejecutar la instrucción Randomize Timer cada vez que se quiera obtener un dato de la variable Rnd.

La función MsgBox.

Sirve para mostrar un cuadro de diálogo para obtener una respuesta del usuario.

 

Sintaxis:

MsgBox (pregunta, botones, titulo)

Donde:

Pregunta, texto que contiene el mensaje para el usuario.

Botones, determina el número y tipo de botones del cuadro de mensaje, así como tipo de icono.

Titulo, el texto que aparece en la barra de titulo del cuadro de mensaje.

 

 

La función InputBox.

Es un recuadro dentro de una ventana que permite al usuario ingresar un dato de tipo cadena (string) y utilizarlo en el programa.

 

Sintaxis:

InputBox(pregunta,titulo)


trianguloDeja un comentario

  Jovenes Informaticos - Tu página de tecnología | Contenido: RSS | Contenido: Enric Cusell  


Warning: include(http://www.intercambios-links.com/jaula.php?code=TNWZnZ) [function.include]: failed to open stream: HTTP request failed! HTTP/1.1 404 Not Found in /home2/enriccus/public_html/jovenesinformaticos/wp-content/themes/jovenes-info/footer.php on line 20

Warning: include() [function.include]: Failed opening 'http://www.intercambios-links.com/jaula.php?code=TNWZnZ' for inclusion (include_path='.:/opt/php52/lib/php') in /home2/enriccus/public_html/jovenesinformaticos/wp-content/themes/jovenes-info/footer.php on line 20