Fonctions mathématiques (Visual Basic)

Article
08/21/2008

Mise à jour : novembre 2007

Les fonctions mathématiques de Visual Basic 6 ont été remplacées par des méthodes équivalentes de la classe System.Math du .NET Framework.

Notes

Les méthodes mathématiques du .NET Framework sont identiques à leurs équivalents Visual Basic 6 d'un point de vue fonctionnel, bien que certaines aient des noms légèrement différents. Par exemple, l'équivalent .NET Framework de la fonction Atn Visual Basic 6 est Atan. Le tableau suivant dresse la liste des noms de fonctions mathématiques Visual Basic 6 et des méthodes .NET Framework équivalentes.

Fonction Visual Basic 6	Méthode .NET Framework	Description
Abs	Abs	Retourne la valeur absolue d'un nombre spécifié.
Atn	Atan	Retourne une valeur Double contenant l'angle dont la tangente est le nombre spécifié.
Cos	Cos	Retourne une valeur Double contenant le cosinus de l'angle spécifié.
Exp	Exp	Retourne une valeur Double contenant e (base des logarithmes népériens) élevé à la puissance spécifiée.
Log	Log	Retourne une valeur Double contenant le logarithme d'un nombre spécifié. Cette méthode est surchargée et peut retourner soit le logarithme népérien (de base e) d'un nombre spécifié, soit le logarithme d'un nombre spécifié dans une base spécifiée.
Round	Round	Retourne une valeur Double contenant le nombre le plus proche de la valeur spécifiée. Des fonctions d'arrondi supplémentaires sont disponibles en tant que méthodes de type intrinsèque, telles que Round.
Sgn	Sign	Retourne une valeur Integer indiquant le signe d'un nombre.
Sin	Sin	Retourne une valeur Double spécifiant le sinus d'un angle.
Sqr	Sqrt	Retourne une valeur Double spécifiant la racine carrée d'un nombre.
Tan	Tan	Retourne une valeur Double contenant la tangente d'un angle.

En outre, la classe mathématique .NET Framework fournit des constantes et autres méthodes statiques pour les fonctions trigonométriques, logarithmiques et les fonctions mathématiques courantes. Toutes ces méthodes peuvent être utilisées dans un programme Visual Basic.

Pour utiliser ces fonctions sans qualification, importez l'espace de noms System.Math dans votre projet en ajoutant le code suivant en haut du code source :

'Imports System.Math

Exemple

Cet exemple utilise la méthode Abs de la classe Math pour calculer la valeur absolue d'un nombre.

' Returns 50.3.
Dim MyNumber1 As Double = Math.Abs(50.3)
' Returns 50.3.
Dim MyNumber2 As Double = Math.Abs(-50.3)

Cet exemple utilise la méthode Atan de la classe Math pour calculer la valeur de pi.

Public Function GetPi() As Double
    ' Calculate the value of pi.
    Return 4.0 * Math.Atan(1.0)
End Function

Cet exemple utilise la méthode Cos de la classe Math pour retourner le cosinus d'un angle.

Public Function Sec(ByVal angle As Double) As Double
    ' Calculate the secant of angle, in radians.
    Return 1.0 / Math.Cos(angle)
End Function

Cet exemple utilise la méthode Exp de la classe Math pour retourner e élevé à une puissance.

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

Cet exemple utilise la méthode Log de la classe Math pour retourner le logarithme népérien d'un nombre.

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

Cet exemple utilise la méthode Round de la classe Math pour arrondir un nombre au nombre entier le plus proche.

' Returns 3.
Dim MyVar2 As Double = Math.Round(2.8)

Cet exemple utilise la méthode Sign de la classe Math pour déterminer le signe d'un nombre.

' 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)

Cet exemple utilise la méthode Sin de la classe Math pour retourner le sinus d'un angle.

Public Function Csc(ByVal angle As Double) As Double
    ' Calculate cosecant of an angle, in radians.
    Return 1.0 / Math.Sin(angle)
End Function

Cet exemple utilise la méthode Sqrt de la classe Math pour calculer la racine carrée d'un nombre.

' 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)

Cet exemple utilise la méthode Tan de la classe Math pour retourner la tangente d'un angle.

Public Function Ctan(ByVal angle As Double) As Double
    ' Calculate cotangent of an angle, in radians.
    Return 1.0 / Math.Tan(angle)
End Function