Mein erstes Programm hätte ich jetzt und nur das kleine Problem,
dass mir eine Zahl exakt mit vier Nachkommástellen dargestellt wird.
Alles mögliche schon gelesen in der Hilfe
' Returns 50.3.
Dim MyNumber1 As Double = Math.Abs(50.3)
' Returns 50.3.
Dim MyNumber2 As Double = Math.Abs(-50.3)
In diesem Beispiel wird der Wert von Pi mit der Atan-Methode der Math-Klasse berechnet.
In Zwischenablage kopierenPublic Function GetPi() As Double
' Calculate the value of pi.
Return 4.0 * Math.Atan(1.0)
End Function
In diesem Beispiel wird der Kosinus eines Winkels mit der Cos-Methode der Math-Klasse zurückgegeben.
In Zwischenablage kopierenPublic Function Sec(ByVal angle As Double) As Double
' Calculate the secant of angle, in radians.
Return 1.0 / Math.Cos(angle)
End Function
In diesem Beispiel wird eine Potenz zur Basis e mit der Exp-Methode der Math-Klasse zurückgegeben.
In Zwischenablage kopierenPublic 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
In diesem Beispiel wird der natürliche Logarithmus einer Zahl mit der Log-Methode der Math-Klasse zurückgegeben.
In Zwischenablage kopierenPublic 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
In diesem Beispiel wird mit der Round-Methode der Math-Klasse eine Zahl auf die nächste ganze Zahl gerundet.
In Zwischenablage kopieren' Returns 3.
Dim MyVar2 As Double = Math.Round(2.8)
In diesem Beispiel wird das Vorzeichen einer Zahl mit der Sign-Methode der Math-Klasse ermittelt.
In Zwischenablage kopieren' 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)
In diesem Beispiel wird der Sinus eines Winkels mit der Sin-Methode der Math-Klasse zurückgegeben.
In Zwischenablage kopierenPublic Function Csc(ByVal angle As Double) As Double
' Calculate cosecant of an angle, in radians.
Return 1.0 / Math.Sin(angle)
End Function
In diesem Beispiel wird die Quadratwurzel einer Zahl mit der Sqrt-Methode der Math-Klasse berechnet.
------------------
wera