Fortran中Open命令的错误操作（插入读取的open命令会打开.txt文件）

Question

这是我的简单代码：

Program Example_Code

Implicit none

Integer :: iERR

  Open( Unit = 15, File = 'Read_Something.txt', Action = 'Read', Status = 'Unknown', iostat = iERR )

    If ( iERR /= 0 ) stop ( "There is no file Read_Something.txt !!!")


  Close( 15, Status = 'Keep')

End Program Example_Code

在项目目录中，我没有创建任何.txt文件（因为我想使用iostat测试打开文件），并且在程序结束后，我在项目文件夹中找到Read_Something.txt。

此示例出了什么问题？ 为什么会出现此明显错误？

IDE：代码：：块17.12，TDM_GCC_5.0.1-03

操作系统：Win 10 X64

Answer 1

您使用status="unknown"，这意味着编译器可以为您创建文件，以便您可以读取文件。如果只想打开一个文件，请使用status="old"。

顺便说一句，我发现明确指定任何="unknown"完全没有用，只需将参数完全省略即可。但这是我的个人风格。