SGN

 

語法

            Result = SGN(Argument)

 

操作

        回傳浮點數的正負符號值。

  • Argument – SGN函數的浮點運算元。

  • Result – 接受SGN函數回傳值的SHORT變數。

 

說明

            SGN指令回傳符點數的正負符號值。浮點數為正數，則回傳值為1。浮點數為負數，則回傳值為-1。浮點數為0，則回傳值為0。
 
 
範例
 

Sub Main()
    Dim Result As Short
    Result = SGN(-0.1)
    Debug "SGN(-0.1) = ", Result, CR
    Result = SGN(0)
    Debug "SGN(0) = ", Result, CR
    Result = SGN(0.1)
    Debug "SGN(0.1) = ", Result, CR
End Sub