freefile的问题

freefile是一个函数，每次调用的时候状态可能不同，所以返回值也会不同。
如果你打开的时候直接用freefile，就算立即关闭，其间没有任何其他文件的打开或关闭，你关闭的时候再直接用freefile也不行了，因为这次取回的也不会是你open时的那个文件号。先用一个变量保存freefile取得的值，然后对变量进行操作。
如：
dim filenum as integer
filenum=freefile
open filename for binary as #filenum
......
close #filenum