IBM Lotus Symphony
|
Devolve o valor absoluto de uma expressão numérica.
Abs (Number)
Duplo
Number: Qualquer expressão numérica para a qual pretenda devolver o valor absoluto. Os números positivos, incluindo o 0, são devolvido sem alteração, ao passo que os números negativos são convertidos em positivos.
O seguinte exemplo utiliza a função Abs para calcular a diferença entre dois valores. A ordem de introdução dos valores é irrelevante.
Sub ExampleDifference
Dim siW1 As Single
Dim siW2 As Single
siW1 = Int(InputBox$ ("Please enter the first amount","Value input"))
siW2 = Int(InputBox$ ("Please enter the second amount","Value input"))
Print "The difference is "; Abs(siW1 - siW2)
End Sub