CVS
Converts a 32-bit integer or 4-byte string to a single-precision variable
Syntax
`
Declare Function CVS ( ByVal i As Integer ) As Single
Declare Function CVS ( ByRef str As Const String ) As Single
`
Usage
`
result = CVS( i )
result = CVS( str )
`
Parameters
`i`
A 32-bit `Integer` with a binary copy of a single-precision variable stored in it.
`str`
A `String` at least 4 bytes in length with a binary copy of a single-precision variable stored in it.
Return Value
Returns a `Single` value holding a binary copy of the input value.
Description
Does a binary copy from a 32-bit `Integer` or 4-byte `String` to a `Single` variable. A value of zero (`0.0`) is returned if the string is less than 4 bytes in length. The result will make sense only if the parameter contained a IEEE-754 formatted single-precision value, such as one generated by `CVI` or `MKS`.
This function is useful to read numeric values from buffers without using a `Type` definition.
Example
`
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)
`
Differences from QB

- QB did not support integer arguments.

See also

- `MKS`
- `CVD`
- `CVI`