CLOSE
来源: https://www.freebasic.net/wiki/wikka.php?wakka=KeyPgClose 最后更新: 2016-08-13
终止对设备访问的流I/O函数。
语法
Close [[#]filenum] [, [#]filenum ...]或(函数调用形式):
result = Close( [#filenum] )参数
- filenum — 要关闭的文件号列表。
返回值
返回32位 Long:成功时为零(0),否则为非零错误码。
说明
关闭以参数传入的文件号对应的文件。若传入未使用的文件号,Close 将返回错误。
无参数的 Close 关闭所有当前打开的文件。
使用 End 语句终止程序将自动关闭所有文件。
示例
vb
Dim buffer As String, f As Integer
buffer = "Hello World within a file."
f = FreeFile
Open "file.ext" For Binary As #f
Put #f, , buffer
Close
' (Check the file "file.ext" upon running to see the output.)与 QB 的差异
Close可以作为函数调用,返回错误码。- FreeBASIC 在尝试关闭未使用的文件号时会抛出错误(启用错误检查时,函数调用形式不会)。