Abs Function

Menghasilkan nilai absolut dari ekspresi numerik.

Sintaksis:

Abs (Angka)

Nilai hasil:

Ganda

Parameter:

Number: Any numeric expression that you want to return the absolute value for. Positive numbers, including 0, are returned unchanged, whereas negative numbers are converted to positive numbers.

The following example uses the Abs function to calculate the difference between two values. It does not matter which value you enter first.

Kode kesalahan:

5 Tidak sah dalam pemanggilan prosedur

Contoh:

Sub ExampleDifference

Dim siW1 As Single

Dim siW2 As Single

    siW1 = Int(InputBox("Please enter the first amount","Value Input"))

    siW2 = Int(InputBox("Please enter the second amount","Value Input"))

    Print "Perbedaannya adalah "; Abs(siW1 - siW2)

End Sub