CVL

• 来源: https://www.freebasic.net/wiki/wikka.php?wakka=KeyPgCvl
• 最后更新: 2016-03-12

---

将单精度浮点数或四字节字符串转换为整数（long）变量

语法

declare function Cvl ( byval sng as single ) as long
declare function Cvl ( byref str as const string ) as long

用法

result = Cvl( sng )
result = Cvl( str )

参数

sng

存储了整数变量二进制副本的 Single 浮点数。

str

长度至少为四字节、存储了整数变量二进制副本的 String。

返回值

包含整数二进制副本的 long 变量。

说明

使用 Single 或长度至少四字节的 String 中的二进制数据返回 32 位 Long 整数值。若字符串长度小于四字节，返回零（0）。

Cvl 用于转换由 Mkl 创建的 4 字节字符串。

此函数也可用于从内存或文件缓冲区转换 32 位整数值，而无需 Type 结构。但与使用类型结构一样，在使用 Cvl 转换从缓冲区读取的字符串时应格外小心。

示例

Dim l As Long, s As String
s = "ABCD"
l = CVL(s)
Print Using "s = ""&"""; s
Print Using "l = &"; l

与 QB 的差异

• 在 QB 中，若传入的字符串长度少于四字节，则发生错误。
• QB 不支持浮点参数。

另请参阅

• Mkl
• Cvshort
• Cvi
• Cvlongint

返回 目录