Skip to content

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 在尝试关闭未使用的文件号时会抛出错误(启用错误检查时,函数调用形式不会)。

另请参阅

基于 FreeBASIC 官方文档翻译 如有侵权请联系我们删除
FreeBASIC 是开源项目,与微软公司无隶属关系