Declare Function Sgn Overload ( ByVal number As Integer ) As Integer
Declare Function Sgn ( ByVal number As LongInt ) As LongInt
Declare Function Sgn ( ByVal number As Double ) As Double

result = Sgn( number )

number

返回number 的符号部分。

• 如果number 大于零，则Sgn将返回1.
  
• 如果number 等于零，则Sgn返回0.
  
• 如果number 小于零，则Sgn返回-1.
  
  

所需的number 参数可以是任何有效的数字表达式。无符号数字将被视为已签名，即如果设置的最高位数将被视为负数，则返回-1.

Sgn一元Operator可以用用户定义的类型重载。

Dim N As Integer = 0

Print Sgn ( -1.87 )
Print Sgn ( 0 )
Print Sgn ( 42.658 )
Print Sgn ( N )

输出将如下所示：

-1
0
1
0

• 在-lang qb 方言中，此运算符无法重载。
  
  

• 没有
  
  

• Abs
  
• Operator