Abs Function

Liveras la absolutan valoron de numera esprimo.

Sintakso:


Abs (Number)

Liverota valoro:

Double

Parametroj:

Number: Numera esprimo por kiu kalkuli la absolutan valoron. Ĝi liveras pozitivan numeron neŝanĝita, dum ĝi liveras negativan numeron konvertita al pozitiva numero.

La jena ekzemplo uzas la funkcion Abs por kalkuli la diferencon inter du valoroj. Ne gravas kiu valoro estas unua.

Error codes:

5 Nevalida procedurvoko

Ekzemplo:


Sub ExampleDifference
Dim siW1 As Single
Dim siW2 As Single
    siW1 = Int(InputBox("Tajpu la unuan kvanton","Valoro enigita"))
    siW2 = Int(InputBox("Tajpu la duan kvanton","Valoro enigita"))
    Print "La diferenco estas "; Abs(siW1 - siW2)
End Sub