Abs Function
Visszaadja egy numerikus kifejezés abszolút értékét.
Szintaxis:
Abs (Szám)
Visszatérési érték:
Double
Paraméterek:
Szám: Numerikus kifejezĂ©s, amelynek az abszolĂşt Ă©rtĂ©kĂ©t kĂvánja megkapni. A pozitĂv számokat, a 0-t is beleĂ©rtve, változatlanul adja vissza, a negatĂv számokat pedig pozitĂvvá alakĂtja.
Az alábbi pĂ©lda az Abs fĂĽggvĂ©ny segĂtsĂ©gĂ©vel számĂtja ki a kĂ©t Ă©rtĂ©k közötti kĂĽlönbsĂ©get. Nem számĂt, hogy melyik Ă©rtĂ©ket Ărja be elĹ‘ször.
Példa:
Sub ExampleDifference
Dim siW1 As Single
Dim siW2 As Single
siW1 = Int(InputBox("Adja meg az első mennyiséget","Bemeneti érték"))
siW2 = Int(InputBox("Adja meg a második mennyiséget","Bemeneti érték"))
Print "A különbség "; Abs(siW1 - siW2)
End Sub