Функция Abs

Връща абсолютната стойност на числов израз.

Синтаксис:


Abs (Number)

Връщана стойност:

Double

Параметри:

Number: числов израз, чиято абсолютна стойност искате да намерите. Положителните числа и 0 не се променят, а отрицателните се превръщат в положителни.

В следващия пример функцията Abs се използва за изчисляване на разликата между двете стойности. Редът на въвеждането не е от значение.

Кодове за грешка:

5 Невалидно извикване на процедура

Пример:


Sub ExampleDifference
Dim siW1 As Single
Dim siW2 As Single
    siW1 = Int(InputBox("Моля, въведете първото количество","Входна стойност"))
    siW2 = Int(InputBox("Моля, въведете второто количество","Входна стойност"))
    Print "Разликата е "; Abs(siW1 - siW2)
End Sub