Los métodos matemáticos de .NET Framework funcionan del mismo modo que sus equivalentes de Visual Basic 6, si bien algunos de sus nombres han sufrido ligeras diferencias. Así, por ejemplo, el equivalente en .NET Framework de la función Atn de Visual Basic 6 es Atan. En la siguiente tabla se detallan los nombres de las funciones matemáticas de Visual Basic 6 y sus métodos equivalentes en .NET Framework:
Función de Visual Basic 6
|
Método en .NET Framework
|
Descripción
|
Abs
|
Abs
|
Devuelve el valor absoluto de un número especificado.
|
Atn
|
Atan
|
Devuelve un valor Double que contiene el ángulo cuya tangente es el número especificado.
|
Cos
|
Cos
|
Devuelve un valor Double que contiene el coseno del ángulo especificado.
|
Exp
|
Exp
|
Devuelve un valor Double que contiene e (base de los logaritmos naturales) elevado a la potencia especificada.
|
Log
|
Log
|
Devuelve un valor Double que contiene el logaritmo del número especificado. Este método está sobrecargado y puede devolver o bien el logaritmo natural (de base e) del número especificado o bien el logaritmo del número especificado en una base especificada. |
Round
|
Round
|
Devuelve un valor de tipo Double que contiene el número más próximo al valor especificado. Existen funciones de redondeo adicionales disponibles como métodos de los tipos intrínsecos, tales como Round. |
Sgn
|
Sign
|
Devuelve un valor Integer que indica el signo de un número.
|
Sin
|
Sin
|
Devuelve un valor Double que especifica el seno de un ángulo.
|
Sqr
|
Sqrt
|
Devuelve un valor Double que especifica la raíz cuadrada de un número.
|
Tan
|
Tan
|
Devuelve un valor Double que contiene la tangente de un ángulo. |
Además, la clase matemática de .NET Framework ofrece constantes y otros métodos estáticos para funciones trigonométricas, logarítmicas y otras funciones matemáticas habituales. Todo ello puede utilizarse en un programa de Visual Basic.
Para utilizar estas funciones sin calificación, importe el espacio de nombres System.Math a su proyecto agregando el siguiente código en la parte superior del código fuente:
Imports System.Math
En este ejemplo se utiliza el método Abs de la clase Math para calcular el valor absoluto de un número.
' Returns 50.3.
Dim MyNumber1 As Double = Math.Abs(50.3)
' Returns 50.3.
Dim MyNumber2 As Double = Math.Abs(-50.3)
Public Function GetPi() As Double
' Calculate the value of pi.
Return 4.0 * Math.Atan(1.0)
End Function
Public Function Sec(ByVal angle As Double) As Double
' Calculate the secant of angle, in radians.
Return 1.0 / Math.Cos(angle)
End Function
Public Function Sinh(ByVal angle As Double) As Double
' Calculate hyperbolic sine of an angle, in radians.
Return (Math.Exp(angle) - Math.Exp(-angle)) / 2.0
End Function
Public Function Asinh(ByVal value As Double) As Double
' Calculate inverse hyperbolic sine, in radians.
Return Math.Log(value + Math.Sqrt(value * value + 1.0))
End Function
' Returns 3. Dim MyVar2 As Double = Math.Round(2.8)
' Returns 1.
Dim MySign1 As Integer = Math.Sign(12)
' Returns -1.
Dim MySign2 As Integer = Math.Sign(-2.4)
' Returns 0.
Dim MySign3 As Integer = Math.Sign(0)
Public Function Csc(ByVal angle As Double) As Double
' Calculate cosecant of an angle, in radians.
Return 1.0 / Math.Sin(angle)
End Function
' Returns 2.
Dim MySqr1 As Double = Math.Sqrt(4)
' Returns 4.79583152331272.
Dim MySqr2 As Double = Math.Sqrt(23)
' Returns 0.
Dim MySqr3 As Double = Math.Sqrt(0)
' Returns NaN (not a number).
Dim MySqr4 As Double = Math.Sqrt(-4)
Public Function Ctan(ByVal angle As Double) As Double ' Calculate cotangent of an angle, in radians. Return 1.0 / Math.Tan(angle) End Function
No hay comentarios:
Publicar un comentario