CVLfunction

Converts a single-precision floating-point number or four-byte string to an integer (Long) variable

Syntax

Declare Function CVL ( ByVal sng As Single ) As Long

Declare Function CVL ( ByRef str As Const String ) As Long

Parameters

Name		Description
`sng`		A `Single` floating-point number with a binary copy of an integer variable stored in it.
`str`		A `String` at least four bytes in length with a binary copy of an integer variable stored in it.

Return value

A Long variable to copy the binary copy of a integer to.

Description

Returns a 32-bit Long integer value using the binary data contained in a Single, or a String of at least four bytes in length. A value of zero (0) is returned if the string is less than four bytes in length.

CVL is used to convert 4-byte strings created with MKL.

This function can also be used to convert 32-bit integer values from a memory or file buffer without the need for a Type structure. However, just as with the type structure, special care should be taken when using CVL to convert strings that have been read from a buffer.

Remarks

Usage



result = CVL( sng )

result = CVL( str )

Differences from QB

In QB an error occurs if the string passed is less than four bytes in length.
QB did not support floating-point arguments.

Example

Dim l As Long, s As String

s = "ABCD"

l = CVL(s)

Print Using "s = ""&"""; s

Print Using "l = &"; l

Reference

Documented in KeyPgCvl.html