Abs Function

Liveras la absolutan valoron de numera esprimo.

Sintakso:

Abs (Number)

Liverota valoro:

Duobla

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