Funciones del lenguaje (IV)
por Luciano Moreno, del departamento de Diseño Web de BJS Software.

Funciones del lenguaje (...C).-

* CDbl( número / variable / expresión )

Función de transformación de subtipos de datos. Recibe como argumento un número, una variable que lo contenga o una expresión válida, devolviendo un valor de tipo Double, es decir, transforma el argumento en un dato de subtipo Double.

Si la expresión o la variable recibidas como argumento no se resuelven en un número obtendremos un error en tiempo de ejecución.

Ejemplo:

<%

    Dim A = 0, miDouble

    A = 234.4567

    miDoble = CDbl(A*0.01)

%>

que nos devuelve como valor miDouble = 2.344567

* Chr( código )

Recibe como argumento un número, lo toma como un valor de código ASCII y devuelve el caracter asociado a dicho código.

Si el argumento queda fuera del rango aceptado para los códigos ASCII, tendremos un error en tiempo de ejecución.

Los números del 0 al 31 son los mismos que los códigos ASCII estándar no imprimibles. Por ejemplo, Chr(10) devuelve un carácter de avance de línea.

Ejemplo:

<%

%>

que nos devuelve miCaracter = "a".

Esta función posée las dos variantes siguientes:

- ChrB( cadena )

que recibe como argumento una cadena que contenga datos tipo byte devolviendo un único byte (los caracteres asociados a un código ASCII a veces pueden tener dos bytes).

- ChrW( código )

para plataformas de 32 bits, que recibe como argumento un código UNICODE, devolviendo el caracter asociado al mismo, evitándose así la conversión de ANSI en UNICODE.

* CInt( número / variable / expresión )

Función de transformación de subtipos de datos. Recibe como argumento un número, una variable que lo contenga o una expresión válida, devolviendo el argumento como subtipo Integer. Si el argumento no se resuelve en un valor numérico o éste se encuentra fuera del rango aceptable para este tipo de datos, se produce un error en tiempo de ejecución.

La función CInt no trunca el valor del número recibido como argumento, si no que lo redondéa al valor entero más cercano. Si el argumento posée como parte fraccional un valor exacto de 0.5, lo redondéa al valor entero par más cercano.

Ejemplo:

<%

    Dim B, miEntero

    B = 1086.429176

    miEntero = CInt(B)

%>

que nos devuelve miEntero = 1086

* CLng( número / variable / expresión )

Función de transformación de subtipos de datos. Recibe como argumento un número, una variable que lo contenga o una expresión válida, devolviendo el argumento como subtipo Long. Si el argumento no se resuelve en un valor numérico o éste se encuentra fuera del rango aceptable para este tipo de datos, se produce un error en tiempo de ejecución.

La función CLng no trunca el valor del número recibido como argumento, si no que lo redondéa al valor entero más cercano. Si el argumento posée como parte fraccional un valor exacto de 0.5, lo redondéa al valor entero par más cercano.

Ejemplo:

<%

    Dim A, B, miLargo1, miLargo2

    A = 108.52
    B = 108.42

    miLargo1 = CInt(A)
    miLargo2 = CInt(B)

%>

que nos devuelve miLargo1 = 109, miLargo2 = 108

* Cos( número / variable / expresión )

Función trigonométrica. Recibe como argumento una nzmero, una variable que lo contenga o una expresión válida que se resuelva en un número, lo toma como valor de un ángulo en radianes, y devuelve el coseno de dicho ángulo.

El coseno de un ángulo en un triángulo rectángulo es la razsn entre el cateto contíguo a dicho ángulo y la hipotenusa del triángulo. Gráficamente:

El valor del coseno de un ángulo puede variar entre -1 y 1 ( -1 < cos(_) < 1 ). Para convertir grados en radianes, multiplicar los grados por PI/180. Para convertir radianes en grados, multiplicar los radianes por 180/PI.

Ejemplo:

<%

    Dim A, miCoseno

    A = PI/2

    miCoseno = Cos(A)

%>

que nos da miCoseno = 0, ya que el coseno de 90º (PI/2 radianes) es cero.

* CSng( número / variable / expresión )

Función de transformación de subtipos de datos. Recibe como argumento un número, una variable que lo contenga o una expresión válida, devolviendo el argumento como subtipo Single. Si el argumento no se resuelve en un valor numérico o éste se encuentra fuera del rango aceptable para este tipo de datos, se produce un error en tiempo de ejecución.

Ejemplo:

<%

    Dim A, B, miSingle

    A = 108.52236598

    miSingle = CSng(A)

%>

que nos devuelve miSingle = 108.52237

* CStr( dato / variable / expresión )

Función de transformación de subtipos de datos. Recibe como argumento un dato que no séa una cadena alfanumérica, una variable que lo contenga o una expresión válida, devolviendo el argumento como subtipo String.

El dato enviado como argumento determina lo que se devuelve según la siguiente tabla:

Si expresión es	CStr devuelve
Boolean	Una cadena que contiene True o False.
Date	Una cadena que contiene una fecha en el formato de fecha corto de su sistema.
Null	Un error en tiempo de ejecución.
Empty	Una cadena de longitud cero ("").
Error	Una cadena que contiene la palabra Error seguida del número de error.
Otro numérico	Una cadena que contiene el número.

Ejemplo:

<%

    Dim A, miCadena

    A = 108.522

    miCadena = CStr(A)

%>

que nos devuelve miCadena = "108.522"