Close [[#]filenum ] [, [#]filenum ...]
or
result = Close( [#filenum ] )

filenum

关闭其文件编号作为参数传递的文件。如果未使用的文件编号通过，Close返回错误。

Close无参数关闭当前打开的所有文件。

使用End语句终止程序将自动关闭所有文件。

Close在成功时返回零（0），否则返回非零错误代码。

'创建一个字符串并填充它。
Dim buffer As String, f As Integer

buffer = "一个文件中的Hello World。"

'找到第一个免费的文件号。
f = FreeFile

'打开文件“file.ext”进行二进制使用，使用数字“f”。
Open "file.ext" For Binary As #f

  '将我们的字符串放在文件中，使用数字“f”。
  Put #f, , buffer

' Close the file.  We could also do 'Close #f', but it'只有多个数字打开时才需要。
Close

'节目结束（运行时查看文件“file.ext”查看输出。）

• 可以将关调用为返回错误代码的函数。
  
• 如果使用错误检查进行编译，并且如果不使用函数式语法，FB将尝试关闭未使用的文件编号，导致错误
  
  

• Open
  
• Put (File I/O)
  
• Get (File I/O)
  
• FreeFile