Abs Function

Возвращает абсолютное значение числового выражения.

Синтаксис


Abs (Число)

Возвращаемое значение:

Double

Параметры:

Число. Любое числовое выражение, для которого нужно вернуть абсолютное значение. Любое положительное число, включая 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