|
Syntax
|
Sgn
(number)
|
|
Description
|
Returns an
Integer
indicating whether a number is less than, greater than, or equal to 0.
|
|
Comments
|
Returns 1 if number is greater than 0.
Returns 0 if number is equal to 0.
Returns –1 if number is less than 0.
The number parameter is a numeric expression of any type. If number is
Null
, then a runtime error is generated.
Empty
is treated as 0.
|
|
Example
|
This example tests the product of two numbers and displays a message based on the sign of the result.
Sub Main()
a% = -100
b% = 100
c% = a% * b%
Select Case Sgn(c%)
Case -1
MsgBox "The product is negative " & Sgn(c%)
Case 0
MsgBox "The product is 0 " & Sgn(c%)
Case 1
MsgBox "The product is positive " & Sgn(c%)
End Select
End Sub
|
|
See Also
|
Abs (function).
|
CIMPLICITY
