CVS
 
Преобразует 32-битное целое число или 4-байтовую строку в переменную одинарной точности (single)

Синтаксис

Declare Function CVS ( ByVal i As Integer ) As Single
Declare Function CVS ( ByRef str As Const String ) As Single

Использование

result = CVS( i )
result = CVS( str )

Параметры

i
32-битный Integer с бинарной копией переменной одинарной точности, хранящейся в нем.
str
String по крайней мере, 4 байта в длину с бинарной копией переменной одинарной точности, хранящейся в ней.

Возвращаемое значение

Возвращает значение Single , содержащее двоичную копию входного значения.

Описание

Создает бинарную копию из 32-битного Integer или 4-байтовой String в переменную Single. Возвращается значение нуль (0.0) если строка меньше 4 байт в длину. Результат будет иметь смысл, только если параметр содержит значение одинарной точности single в формате IEEE-754, например, созданный с помощью CVI или MKS.

Эта функция полезна для чтения числовых значений из буферов без использования определения Type.

Пример

Dim f As Single, i As Integer
f = 1.125
i = CVI(f)

Print Using "i = _&H&"; Hex(i)
Print Using "cvs(i) = &"; CVS(i)


Отличия от QB

  • QB не поддерживает целочисленные аргументы.

См. также