IBM Lotus Symphony
|
Returnerer den absolutte verdien av et numerisk uttrykk.
Abs (Tall)
Dobbel
Tall: Et numerisk uttrykk som du vil returnere den absolutte verdien for. Positive tall, inklusive 0, blir returnert uendret, mens negative tall blir konvertert til positive tall.
I det neste eksempelet brukes Abs-funksjonen til å beregne differansen mellom to verdier. Det spiller ingen rolle hvilken verdi du angir først.
Sub ExampleDifference
Dim siW1 As Single
Dim siW2 As Single
siW1 = Int(InputBox$ ("Skriv inn første antall","Verdi angitt"))
siW2 = Int(InputBox$ ("Skriv inn andre antall","Verdi angitt"))
Print "Differansen er "; Abs(siW1 - siW2)
End Sub