fortran读取txt文件

mmwj1990

求助：用如下程序读b.txt这个文件，为什么运行后总出现一个内容为空的同名为b的文本文件？
program mian
character filename
real DIV(18,10)
filename='b.txt'
open(1,file=filename)
do i=1,18
read(1,*)(DIV(i,j),j=1,10)
end do
end

四叶草

言深深 发表于 2013-11-22 08:25

                               
登录/注册后可看大图

因为你的filename是一个字符变量，长度比单独的 b.txt要长，因此有理由认为你所说的出现空的b.txt应该是在b ...

好专业的答复，学习了。。。

andrewsoong

open(1,file='b.txt')

mmwj1990

andrewsoong 发表于 2013-11-21 18:10

                               
登录/注册后可看大图

open(1,file='b.txt')

太感谢啦！
只是之前我这样处理过，没出现过这个错误，这次要打开很多个txt文本，所以这样写了。
想再向您请教一下原因？（为什么之前的写法不行？）

andrewsoong

mmwj1990 发表于 2013-11-21 18:15

                               
登录/注册后可看大图

太感谢啦！
只是之前我这样处理过，没出现过这个错误，这次要打开很多个txt文本，所以这样写了。
想再向 ...

既然是批处理，那你就搜索本论坛的fortran批处理吧~~~

mmwj1990

andrewsoong 发表于 2013-11-21 18:31

                               
登录/注册后可看大图

既然是批处理，那你就搜索本论坛的fortran批处理吧~~~

好的，谢谢！

mmwj1990

andrewsoong 发表于 2013-11-21 18:31

                               
登录/注册后可看大图

既然是批处理，那你就搜索本论坛的fortran批处理吧~~~

我试了一下，去掉.txt就可以按之前的做了，即用循环打开多个txt文本，是数据的问题。

言深深

因为你的filename是一个字符变量，长度比单独的 b.txt要长，因此有理由认为你所说的出现空的b.txt应该是在b前面有至少3个空格的···正确的修改方法是file=trim(filename)，trim表示去掉空格···

aa22556688

楼上的人好厉害。

mmwj1990

言深深 发表于 2013-11-22 08:25

                               
登录/注册后可看大图

因为你的filename是一个字符变量，长度比单独的 b.txt要长，因此有理由认为你所说的出现空的b.txt应该是在b ...

好的，明白了，非常感谢！