共用方式為


Sgn Function

This page is specific to the Visual Basic for Applications (VBA) Language Reference for Office 2010.

Returns a Variant (Integer) indicating the sign of a number.

Syntax

Sgn(number)

The required number argument can be any valid numeric expression.

Return Values

If number is

Sgn returns

Greater than zero

1

Equal to zero

0

Less than zero

-1

Remarks

The sign of the number argument determines the return value of the Sgn function.

Example

This example uses the Sgn function to determine the sign of a number.

Dim MyVar1, MyVar2, MyVar3, MySign
MyVar1 = 12: MyVar2 = -2.4: MyVar3 = 0
MySign = Sgn(MyVar1)    ' Returns 1.
MySign = Sgn(MyVar2)    ' Returns -1.
MySign = Sgn(MyVar3)    ' Returns 0.