LibreOffice 24.2 abi
Tagastab arvavaldise absoluutväärtuse.
Abs (arv)
Double
Arv: suvaline arvavaldis, mille absoluutvärtust soovid leida. Positiivsed arvud, kaasa arvatud 0, tagastatakse muutmata kujul, negatiivsed arvud teisendatakse positiivseteks.
Järgmises näites kasutatakse funktsiooni Abs kahe väärtuse vahelise erinevuse arvutamiseks. Pole oluline, kumma väärtuse sisestad esimesena.
Sub ExampleDifference
Dim siW1 As Single
Dim siW2 As Single
siW1 = Int(InputBox$ ("Palun sisesta esimene kogus","Väärtuse sisestus"))
siW2 = Int(InputBox$ ("Palun sisesta teine kogus","Väärtuse sisestus"))
Print "Erinevus on "; Abs(siW1 - siW2)
End Sub