使用文件

SPEL+有几个处理文件的命令。

关键字	描述
AOpen	打开追加文件。
BOpen	打开二进制访问文件。
Close	关闭文件。
FileExists	检查文件是否存在。
FolderExists	检查文件夹是否存在。
FreeFile	返回未使用的文件句柄。
Input	从文件中输入一个或多个变量。
Del	删除文件。
Line Input	从文件中输入一行。
Read	将指定的字节数读入一个字符串变量中。
ReadBin	读取二进制数据。
ROpen	以只读模式打开文件。
Seek	设置当前的文件指针。
Flush	将数据缓冲区写入磁盘。
WOpen	以写入模式打开文件。
Write	将字符串写入文件。不添加行终止符。
WriteBin	写入二进制数据。

使用文件之前，必须使用下列命令之一将其打开：AOpen、Bopen、ROpen和WOpen。并在Open语句中指定一个文件号。文件号可以是30至63。

下面是一个保存和读取文本文件的例子。

String data$(10)

Function SaveData()
  Integer fNum, i

  fNum = FreeFile
  WOpen "c:\mydata\data.txt" As #fNum  ' Store the count
  Print #fNum, UBound(data$)
  For i = 0 To UBound(data$)
    Print #fNum, data$(i)
  Next i
  Close #fNum
Fend

Function LoadData()
  Integer fNum, i, maxNum
  fNum = FreeFile
  ROpen "c:\mydata\data.txt" As #fNum
  Input #fNum, maxNum
  Redim data$(maxNum)
  For i = 0 To UBound(data$)
    Input #fNum, data$(i)
  Next i
  Close #fNum
Fend