///////////////////////////////////////////////////////////////////////////////////////////////////////////////
Public Function CVS(msbin_s() As Byte) As Single
'機能 大きさが4のバイト型配列に保持された MS Binary 形式の単精度浮動
' 小数点数を数値に変換して、戻り値として返す。
'入力 msbin_s : MS Binary 形式の単精度浮動小数点数を保持するバイト型配列
'出力 戻り値 : 単精度実数に変換した値
CVS = mantissa# * 2# ^ exponent%
End Function
///////////////////////////////////////////////////////////////////////////////////////////////////////////////