Open Err
 
打开文件操作的标准输入(stdin )和标准错误(stderr )流。

语法

Open Err [for mode ] As [#]filenum As Integer

用法

Open Err [for mode ] as [#]filenum
or
result = Open Err( [for mode ] as [#]filenum )

参数

mode
忽略。
filenum
未使用的文件编号。

返回值

如果Open Err成功完成,则返回零,否则返回非零值,表示失败。

说明

此命令打开stdin以读取并stderr写入控制台,允许使用正常文件命令进行读写操作。

stderr是与stdout不同的输出流,允许错误消息与主控制台输出分开重定向。

正常的控制台命令(如ColorLocate)在此模式下不起作用,因为它们不接受文件编号。

[For Input|Output]mode 被允许兼容,但会被忽略。

运行时错误:
Open Err会抛出以下运行时错误之一:

(1) Illegal function call
    • Filenumber 当时不是免费的。使用FreeFile确保filenumber 免费。

例子

Dim a As String
Open Err For Input  As #1
Print #1,"请写一些东西,然后按ENTER"
Line Input #1, a 
Print #1, "你写了"; a
Close
Sleep


与QB差别

  • 新的FreeBASIC

参考