SHORT2FLOAT

 
語法

        Result = SHORT2FLOAT(Argument)

 

操作

        SHORT值轉換成浮點格式。

  • Argument SHORT2FLOAT函數的SHORT運算元。
  • Result 用來接收BYTE2FLOAT函數結果的浮點變數。

說明

        SHORT2FLOAT指令將一個SHORT值轉換成浮點格式。浮點數的值會是一個範圍在-128.0 to +127.0的整數。

 

範例

 
Sub Main()
   
Dim MyShort As Short
   
Dim MyFloat As Float   

    MyShort = -
128
    MyFloat =
SHORT2FLOAT(MyShort)      ' MyFloat has the value -128.0
    Debug "SHORT2FLOAT of -128 : ", MyFloat, CR
    MyShort =
127
    MyFloat =
SHORT2FLOAT(MyShort)      ' MyFloat has the value 127.0
    Debug "SHORT2FLOAT of 127 : ", MyFloat, CR
End Sub