Basic Facil - Funciones Matematicas

Al igual que las funciones vistas para el manejo de cadenas de caracteres, existe una serie de
funciones matemáticas las cuales permiten realizar cálculos dentro de un programa de Visual Basic.


Función  Función en   Función  Función en 
matemática  Visual Basic  matemática  Visual Basic
Valor absoluto  Abs(x)  Nº aleatorio  Rnd
Arco tangente  Atn(x)  Seno y coseno  Sin(x), Cos(x)
Exponencial Exp(x) Tangente Tan(x)
Parte entera   Int(x), Fix(x)  Raíz cuadrada  Sqr(x)
Logaritmo  Log(x)  Signo (1, 0, -1)  Sgn(x)
Redondeo Round(x, ndec)

Ejemplos:
MyNumber = Abs(50.3)              ' Devuelve 50.3.
MyNumber = Abs(-50.3)             ' Devuelve 50.3.
MyAngle = 1.3                     ' El ángulo debe estar en radianes.
MySecant = 1 / Cos(MyAngle)       ' Calcula la secante.
MySqr = Sqr(4)                    ' Devuelve 2.
MySqr = Sqr(23)                   ' Devuelve 4.79583152331272.
MyVar1 = 12: MyVar2 = -2.4: MyVar3 = 0 'Declaración de las variables
MySign = Sgn(MyVar1)              ' Devuelve 1.
MySign = Sgn(MyVar2)              ' Devuelve -1.
MySign = Sgn(MyVar3)              ' Devuelve 0.
Las funciones trigonométricas de Visual Basic utilizan radianes para medir los ángulos.

Función matemática  Expresión equivalente
Secante  Sec(X) = 1 / Cos(X)
Cosecante  Cosec(X) = 1 / Sin(X)
Cotangente  Cotan(X) = 1 / Tan(X)
Arcoseno  Arcsin(X) = Atn(X / Sqr(-X * X + 1))
Arcocoseno  Arccos(X) = Atn(-X / Sqr(-X * X + 1)) + 2 * Atn(1)
Arcosecante  Arcsec(X) = Atn(X / Sqr(X * X – 1)) + Sgn((X) -1) * (2 * Atn(1))
Arcocosecante  Arccosec(X) = Atn(X / Sqr(X * X - 1)) + (Sgn(X) - 1) * (2 * Atn(1))
Arcocotangente  Arccotan(X) = Atn(X) + 2 * Atn(1)
Seno Hiperbólico  HSin(X) = (Exp(X) - Exp(-X)) / 2 
Coseno Hiperbólico  Hcos(X) = (Exp(X) + Exp(-X)) / 2
Tangente Hiperbólica  Htan(X) = (Exp(X) - Exp(-X)) / (Exp(X) + Exp(-X))
Secante Hiperbólica  HSec(X) = 2 / (Exp(X) + Exp(-X))
Cosecante Hiperbólica  Hcosec(X) = 2 / (Exp(X) - Exp(-X))
Cotangente Hiperbólica  Hcotan(X) = (Exp(X) + Exp(-X)) / (Exp(X) - Exp(-X))
Arcoseno Hiperbólico  Harcsin(X) = Log(X + Sqr(X * X + 1))
Arcocoseno Hiperbólico  Harccos(X) = Log(X + Sqr(X * X - 1))
Arcotangente Hiperbólica  Harctan(X) = Log((1 + X) / (1 - X)) / 2
Arcosecante Hiperbólica  Harcsec(X) = Log((Sqr(-X * X + 1) + 1) / X)
Arcocosecante Hiperbólica  Harccosec(X) = Log((Sgn(X) * Sqr(X * X + 1) +1) / X)
Arcocotangente Hiperbólica  Harccotan(X) = Log((X + 1) / (X – 1)) / 2
Logaritmo en base N  LogN(X) = Log(X) / Log(N)