Funktion Abs

Ermittelt den Absolutwert eines numerischen Ausdrucks.

Syntax:


Abs (Zahl)

Rückgabewert:

Double

Parameter:

Zahl: Ein beliebiger numerischer Ausdruck, dessen Absolutwert (Betrag) zurückgegeben werden soll. Positive Zahlen einschließlich 0 werden unverändert zurückgegeben, negative Zahlen jedoch in positive Zahlen umgewandelt.

Das folgende Beispiel verwendet die Funktion Abs, um die Differenz zweier Werte zu berechnen. Es ist unerheblich, welcher Wert zuerst eingegeben wird.

Fehlercodes:

5 Ungültiger Prozeduraufruf

Beispiel:


Sub ExampleDifference
Dim siW1 As Single
Dim siW2 As Single
    siW1 = Int(InputBox("Bitte den ersten Betrag eingeben","Werteingabe"))
    siW2 = Int(InputBox("Bitte den zweiten Betrag eingeben","Werteingabe"))
    Print "Die Differenz beträgt "; Abs(siW1 - siW2)
End Sub